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PREFACE 


This Burroughs B 1000 Systems Memory Dump Analysis Functional Description Manual describes tech- 
niques that a support person can use to locate the immediate and fundamental causes of system halts 
and system hangs, as well as certain performance problems. The manual provides a detailed description 
of the information contained in a system memory dump and a program memory dump and shows how 
to determine the state of the processor, the software, and the input/output operations at the time the 
system memory dump is taken. 


Following are summaries of the contents of each section of the manual. 


Section 1: System Memory Dump 
The various types of system halts and system hangs are defined. Also, procedures for dumping 
the state of the system into the SYSTEM/DUMPFILE file are described, GISMO debugging aids 
are explained, and the Fault Dockets, forms to be completed at the time of a system halt or hang, 
are exhibited. 


Section 2: The SYSTEM/IDA Program 
Explains how to produce a formatted analysis of the SYSTEM/DUMPFILE file using the Interac- 
tive Dump Analyzer (SYSTEM/IDA) program. 


Section 3: Operating System Components 
Lists the components of the operating system and describes the functions of each component. 


Section 4: Problem Analysis Overview 
Provides an overview of the steps required to analyze system halts and system hangs. 


Section 5: State of the Software 
Describes how to determine the status of each operating system component and each job in the 
mix. 


Section 6: State of the Input/Output Operations 
Describes how to determine the status of each input/output operation represented in the system 
memory dump. 


The appendixes cover the following topics: 
Appendix A: examples of SYSTEM/IDA program execution. 


Appendix B: hardware organization. 
Appendix C: control of processor allocation by GISMO. 


Appendix D: memory organization. 
Appendix E: memory management. 
Appendix F: input/output operations. 
Appendix G: disk organization. 


Appendix H: tape organization. 
Appendix I: RPG memory dumps. 
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SECTION 1 
SYSTEM MEMORY DUMP 


If the B 1000 system halts or hangs, several actions may be taken to isolate, analyze, and solve the 
problem. In the paragraphs that follow, along with definitions of the various types of system halts 
and system hangs, the steps to be taken by the system operator on a halt or hang are given. Also 
in this section, Fault Dockets, forms to be completed at the time of a halt or hang, are exhibited, 
and procedures for performing a CLEAR/START system memory dump and for using the GISMO 
trace routine are outlined. 


SYSTEM HALT 


A system halt is indicated when a system running under MCP control stops performing work, and the 
RUN indicator goes off. There are two classes of system halts: software-controlled system halts and 
undefined system halts. 


Software-Controlled System Halt 


A system halt with the ERROR indicator off and a defined value in the L register is a software-control- 
led system halt. This type of halt may occur when an MCP component (GISMO, the Micro MCP, 
or the SDL2 Interpreter when running the SMCP) detects an invalid value in a data field or register, 
a condition in which further processing will result in data corruption or loss. When this happens, the 
contents of the L, T, X, and Y registers of the master processor) are written into the HINTS record 
in lower memory, and a HALT microinstruction is then executed. The L, T, X, and Y registers of 
the slave processor are written in a memory area allocated for the slave processor. 


Defined L register values are those with any of the following patterns in the sixteen leftmost bit posi- 
tions (bits 0-15) of the register. 


Pattern Routine or program that halted 


@0000@ SDL2 Interpreter on behalf of the MCP 
@0200@ Micro MCP 

@0D00@ GISMO 

@0D01@ GISMO 

@00FO@  SYSTEM/INIT 

@000F@ CLEAR/START 


For more information on the use of the L register, refer to section 8 of the B 1000 Systems System 
Software Operation Guide, Volume 1. All relevant values for the 24-bit L register are listed there. 


When a software-controlled system halt occurs, the operator should take the following action: 
1. Fill in a Fault Docket. See Fault Dockets, later in this section. 


2. Perform a CLEAR/START operation with a system memory dump. (Exception: No dump is 
required if HALT occurred during CLEAR/START or SYSTEM/INIT as indicated by LC or 
LD = F.) The CLEAR/START program and memory dump procedure are described in detail 
in section 4 of the B 1000 Systems System Software Operation Guide, Volume 2. Also see 
CLEAR/START and System Memory Dump, later in this section. 


3. Package the system memory dump. 
1152055 1-1 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
System Memory Dump 


Undefined System Halt 


A system halt with an undefined value in the L register and the ERROR indicator either on or off 
is an undefined system halt. An undefined L register value is one that is not listed in section 8 of 
the B 1000 Systems System Software Operation Guide, Volume 1. 


The MCP components are designed to halt in a defined manner. An undefined system halt occurs when 
a processor or memory error leads to the execution of a HALT microinstruction. This may result from 
the transfer of processor control out of the defined instruction sequence, from the execution of one 


Or more corrupted microinstructions, or from the detection of an irrecoverable hardware problem by 
the processor. 


When an undefined system halt occurs, the operator should take the following action: 
1. Fill in a Fault Docket. 
2. Perform a CLEAR/START operation with a system memory dump. 


3. Package the system memory dump. 
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SYSTEM HANG 


“Hang” is the name given to the condition in which a system running under MCP control does not 
respond to ODT commands even though the RUN indicator is on. If the system in this condition comes 
to a halt when the INTERRUPT button is pressed, an interruptible system hang has occurred. If the 
system does not halt when the INTERRUPT button is pressed but does halt when the HALT button 
is pressed, a non-interruptible system hang has occurred. If neither the INTERRUPT button nor the 
HALT button cause the system to halt, a processor hang has occurred. 


Interruptible and Non-Interruptible Hangs 
In an interruptible system hang, an MCP component or a job of very high priority is in a loop, pre- 
venting jobs of lower priority from running. Once the hang is detected, the operator should wait at 


least 60 seconds before pressing the INTERRUPT button because the MCP may wait that long for 
some I/O operations to complete. 


If the INTERRUPT button has no effect, the condition may be a non-interruptible system hang or 
a processor hang. 


A non-interruptible hang occurs when a microcoded MCP component is in a microinstruction loop and 
is not leaving the loop to test for the interrupt. In this case, pressing the HALT pushbutton brings 
the system to a halt. 
If the HALT button has no effect, a processor hang condition exists. See Processor Hang. 
For an interruptible or non-interruptible hang, the operator should take the following action: 
1. Fill in a Fault Docket. 
2. If the system hang is reproducible, set up for a GISMO trace of the disk channel(s), GISMO, 
port, MMCP, SMCP, scheduler, interrupt.handler, and timer.interrupt (TG = @0041B8@ for 
a single disk channel on channel 9, @0061B8@ for disk channels 9 and 10), and perform the 
sequence leading up to the hang again. A full GISMO trace is rarely required. 
3. Perform a CLEAR/START operation with a system memory dump. 
4. Package the system memory dump. 
Processor Hang 
A processor hang has occurred when the system is hung and neither the INTERRUPT nor the HALT 
button brings the system to a halt. This type of hang is caused by a hardware malfunction. In this 
situation, the operator should perform the following steps: 
1. Push the HALT and CLEAR buttons at the same time. 
2. Perform a clear/start operation and resume processing if possible. 


3. Notify a Burroughs Field Engineer even if processing resumes. 


There is no need to fill in the Fault Docket, set up a full GISMO trace, or take a system memory 
dump. 
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FAULT DOCKETS 


Figure 1-1 shows the Fault Docket form for dual-processor systems, and figure 1-2 shows the form 
for single-processor systems. The forms are self-explanatory. Table 1-1 identifies the indicators and reg- 
isters of interest. 


B 1000 Dual Processor Fault Docket 
OPERATOR: SYSTEM: DATE: TIME: 


In the event of a system halt or hang, please answer the 
following (circle the appropriate response) : 


1. Are the RUN lights ON? 
Master: ON OFF Slave: ON OFF 
if both are OFF, then go to step 6. 


2% Enter the HALT system command. Are the RUN lights ON? 
Master: ON OFF Slave: ON OFF 
lf both are OFF, then go to step 6. 


3. Press the INTERRUPT pushbutton. Are the RUN lights ON? 
Master: ON OFF Slave: ON OFF 
If both are OFF, then go to step 6. 
4, Press the HALT pushbutton. Are the RUN lights ON? 
Master: ON OFF Slave: ON OFF 
If both are OFF, then go to step 6. 
5. Press HALT and CLEAR. Call Field Engineer for assistance. 


6. Is the ERROR light on? 
Master: ON OFF Slave: ON OFF 


]. Is the STATE light on? 
Master: ON OFF Slaves: ON OFF 


8. What are the values in the following registers? 


Master Slave 
L LR L LR 
T cc T CC 
X CD X CD 
Y PERM Y PERM 
A PERP A PERP 
FA FA 
9. Write the halt definition below: 
Master: 
Slave: 


10. Comments: 


Master: 


Figure 1-1. Fault Docket for Dual-Processor Systems 
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B 1000 Single Processor Fault Docket 
OPERATOR: SYSTEM: DATE: TIME: 


In the event of a system halt or hang, please answer the 
following (circle the appropriate response) : 


1. Is the RUN light on? 
ON OFF 
lf OFF, then go to step 6. 
2% Enter ate HALT system command. Is the RUN light ON? 
ON 
if OFF, then go to step 6. 
a DS EES INTERRUPT pushbutton. Is the RUN light ON? 
ON 
If OFF, then go to step 6. 
hk, Press Ene HALT pushbutton. Is the RUN light ON? 
ON OF 
If OFF, then go to step 6. 
5. Press HALT and CLEAR. Call Field Engineer for assistance. 
6. Is the ERROR light on? 
ON OFF 
Te Is the STATE light on? 
ON OFF 


8. What are the values in the following registers? 


TP <>< +4 
2) 
o 


A 
9. Write the halt definition below: 


10. Comments: 


Figure 1-2. Fault Docket for Single-Processor Systems 
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CD 


PERM 
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Indicates CC(0) is TRUE, used by system performance monitor. 
Indicates processor is running, as opposed to halted. 
Indicates one or more bits in PERM or PERP is TRUE. 


Usage 
Working storage 
Working storage 
Working storage 
Working storage 
Address Register for microinstructions 
Field address, the absolute bit address used to access 
a main memory data field. 
Limit Register 
cc ) = STATE light on console 
CC(1)} = Real time clock interrupt, set by hardware 
every 100 milliseconds 
CC(2) = 1/0 service request by one or more controls 
CC 3 INTERRUPT button on console pushed 
CD (0) M-register micro fetch parity error 
Cache Key parity error 
Cache double hit 
Console cassette parity error 
Uncorrectable S Memory parity error 
PERM register has changed 
S Memory field out of bounds 
S Memory microinstruction time out 
CD(1) = Memory Write/Swap out of bounds override 
CD(2) = Read out of bounds (FA < BR or FA > LR) 
CD(3) = Write or Swap out of bounds (FA < BR or FA > LR) 
Parity ERror Memory 


peony = S$ Memory microinstruction time out 
PERM(1) = Read, Write, or Swap out of memory (FA > MAXS) 
pee = Error Log register changed 
PERM(3) = Uncorrectable CPU access error to S Memory 
If it occurs during fetch, the processor halts. 
Parity ERror Processor 
PERP (0) = Cache double hit 
PERP(1) = Cache Key parity error 
PERP(2) = M Register parity error 
PERP (3) = Cassette read error 


Table 1-1. Indicators and Registers 
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CLEAR/START AND SYSTEM MEMORY DUMP 


After the Fault Docket form has been completed, a CLEAR/START operation with a system memory 
dump is called for on all halts and hangs. 


DUMP System Option 


The DUMP system option must be set if a CLEAR/START with a system memory dump is desired. 
If this option is reset, the SYSTEM/DUMPFILE file does not exist, its address in the COLD START 
VARIABLES is. zero, and, therefore, a system memory dump operation is not possible. As standard 
operating procedure, it is advisable to run with the DUMP system option always set. 


Memory Dump Details 


The system memory dump must be completed successfully in the first CLEAR/START operation fol- 
lowing the halt. This is because the first step in the process writes the entire contents of memory to 
the SYSTEM/DUMPFILE file on disk, and the second step (the CLEAR/START itself) clears 
memory, writing zeros and correct parity throughout. Thus, the state of the system when the problem 
occurred is no longer reflected in memory after a CLEAR/START operation. 


The contents of the SYSTEM/DUMPFILE file are valid only if the system is running under MCP con- 
trol at. the time the system memory dump operation is performed. This process cannot be used for 
analyzing problems when the CLEAR/START, SYSTEM/INIT or STANDALONE programs are in 
control. 


A special situation may arise when a system appears to hang, for example, printers and tapes stop, 
but it still responds to system commands. It is acceptable, in this case, to enter a DM system command 
with no mix number to get a system memory dump. However, this action sometimes causes the actual 
problem data to be lost --the processing associated with reading, recognizing, and executing the DM 
system command rearranges memory and changes the state of the system. Either of the following pro- 
cedures avoids this problem: 


1. Interrupt the system and take a CLEAR/START system memory dump, thus preserving the ex- 
act state of the machine at the time of the hang. 


2. Run system performance monitoring to determine what the system is actually doing. System 
performance monitoring is described in appendix B of the B 1000 Systems System Software Op- 
eration Guide, Volume 1. 


Packaging the System Memory Dump 


If the analysis of the contents of the SYSTEM/DUMPFILE file is not to be performed immediately 
following the system memory dump operation, the current file must be packaged for later analysis. 
This is done by entering the PM system command to generate a packaged dump file with the default 
name of DUMPFILE/PM<nnn>, where <nnn> is the next number from the BACKUP stream. 


The packaged dump file includes the contents of the SYSTEM/DUMPFILE file plus layout tables for 
the SMCP, the network controller, and the DMS access routines. Object code segments from memory 
at the time of the system memory dump are compared with the corresponding object code files on 
disk, and code segment comparison error information is included in the packaged file. 


This packaged file is to be submitted with the Fault Docket and an FCF describing the problem. 
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GISMO TRACE 


The GISMO trace facility is a powerful and useful debugging tool. It can be used to pinpoint I/O 
subsystem failures, as well as to track down system software problems. Invoking the GISMO trace fa- 
cility incurs an overhead of 3 percent to 20 percent depending upon the functions being traced. 


The GISMO tracing code is in a discardable segment that may be requested at CLEAR/START time. 
If it is not requested, the segment is discarded. If either the BR register or the TG register is non- 
zero at CLEAR/START time, the segment is included. 


Setting the Trace Parameters 


The TG command is used to permanently specify the trace parameters normally entered in the BR regis- 
ter and results in the same action as would have occurred had the parameters been loaded manually 
into the BR register during a CLEAR/START operation. Trace parameters that are specified by means 
of the TG command are overridden if the BR register is non-zero at CLEAR/START time. 


Trace parameters that have been established during the CLEAR/START operation may be changed 
by means of the TG command; that is, a second CLEAR/START operation is not required to change 
the trace parameters. 


On B 1990 systems, the trace flags are entered at CLEAR/START time by the TEXT TG command, 
followed by six hexadecimal digits representing the trace flags. No @ symbols are used. On the other 
B 1000 systems, the trace flags are entered at CLEAR/START time by loading the BR register after 
the TAPE mode finishes but before RUN mode commences. The L register is equal to @AAAAAA@ 
at this point. 


The 24 bits comprising the trace parameters are defined in table 1-2. 
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Table 1-2. Trace Parameters 


Bits Function 
0-14 Trace physical I/O on the corresponding channel 


Dispatch through channel table 

Reference address, op code, and disk sector address 
Service request 

Reference address and result descriptor 

Extended result descriptor 

Data transfer (when bit 22 is also set) 

Pocket select 

Seek complete 

Missing device 

Bad reference address 


15 Trace GISMO scheduling and interrupt operations 


Block slave 

Unblock slave 

Block slave complete 
DCPU dispatch 

Set event for interrupt queue or I/O complete 
Save interrupt 

Fetch interrupt 
Communicate 

Rehang program 

Hang program 

Wait 

Cause program 

Set event index for waiting program 
Reinstate job 

Mark in queue 

Queue out top 

Adjust interpreter 
Communicate with GISMO 
Run MMCP 

MMCP page zero fault 
MMCP return 


16 Trace GISMO port activity 
Port dispatch 
Port interrupt 
Port lockout 
Port missing device 


17 Trace user interpreters (debug versions only) 
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Table 1-2. Trace Parameters (Cont) 

Bits Function 
18 Trace MMCP (must use MICRO-MCP/DEBUG) 

CONDITIONAL.HALTS 

Logical I/O 

Interprogram communication 
19 Trace SMCP CONDITIONAL.HALTS (sets bit 2 of SEGMENT__HALT) 
20 Trace GISMO scheduler and interrupt handler 

Lock scheduler 

Unlock scheduler 

Run scheduler 

Interrupt handler 

Timer interrupt 
21 Trace time stamp 

Include time stamp in trace table 


22 Trace data transfers for selected channel(s) 


23 Used internally by GISMO. 


To trace all the non-I/O functions, bits 15, 16, 18, 19, 20, and 21 must be turned on. Enter: 
TG @0001IBC@ 
To trace only the disk channel, assumed to be located on channel 9, bit 9 must be turned on. Enter: 
TG @004000@ 
To display the settings of the trace flags, enter: 
TG 
To reset the trace flags, enter 
TG 0 


Tracing of data transfers uses up the trace table very quickly, and should not be used unless advised 
by Burroughs. 


Some of the Trace GISMO functions concerning processor allocation are described in appendix C. 
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Printing the Trace Table 


Printing of the GISMO trace table is part of the function of the analyzer (the SYSTEM/IDA program). 
Thus, a system memory dump is required to capture the trace table contents. The analyzer causes the 
table entries to be printed in a readable format. It combines multiple entries onto single print lines 
for ease of use, where applicable, and prints the trace table, maintained by GISMO in a “wrap-around” 
fashion, in chronological order with the most recent entries at the end of the printout. 


The output listing of the GISMO trace table produced by the analyzer contains four columns of infor- 
mation. Column contents are as follows: 


Column Identification Contents 


MASTER...SLAVE EVENT Name of the event traced 
An event on the slave is preceded by ”...” 


CHANNEL. Channel affected 
REF-ADDR Address of the I/O descriptor 
DESCRIPTION Further information and parameters 


INVOKING MICRO-MCP/DEBUG 


MICRO-MCP/DEBUG is the debug version of the Micro MCP. It is invoked by entering the following 
CM system commands and then performing a CLEAR/START operation. 


CM MMX MCPII/MICRO-MCP 
CM MM MICRO-MCP/DEBUG 


The debug version of the Micro MCP is placed into the standard Name Table entry. The non-debug 


version is placed into the experimental Name Table entry and is available for restoring the system to 
a non-debug state. 
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SECTION 2 
THE SYSTEM/IDA PROGRAM 


The Interactive Dump Analyzer (SYSTEM/IDA) program replaces the ISSA program and the 
DUMP/ANALYZER program. Neither of those programs is included in the Mark 12.0 B 1000 System 
software release. 


The SYSTEM/IDA program analyzes system memory dump files, program dump files, and programs 
within system memory dump files. 


The PM system command causes the SYSTEM/IDA program to transform the SYSTEM/DUMPFILE 
file into a packaged dump file that includes the contents of system memory, layout tables, and code 
segment comparison error information. Layout tables contain the SDL2 data declarations used by 
SYSTEM/IDA to interpret the contents of memory. Packaging the SYSTEM/DUMPFILE file is essen- 
tial if later analysis or transmission of the file to another site for analysis is contemplated. Only SMCP, 
NDL, and DMS access routine layouts are added to the packaged dump file. 


Direct execution of the SYSTEM/IDA program allows interactive analysis of selected portions of a 
dump file. Direct execution also enables a formatted analysis of the entire dump file or portion of 
it to be printed. 
SYSTEM/IDA commands belong to two categories, control commands and object commands. The ob- 
ject commands may be further subdivided into two types: program object commands and system object 
commands. 
Control commands are active; in addition to returning information, they may be used to change the 
current job, current environment, current file, and so forth. Object commands are passive; they return 
information but have no influence on subsequent actions. 
Multiple commands separated by semicolons may be included in a single transmission. 
Example: 

GET SYSTEM/DUMPFILE; PRINT IOAT; PRINT CHANNELS; PRINT DISK 


All commands are described under the headings Control Commands, Program Object Commands, and 
System Object Commands in this section. 
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USING SYSTEM/IDA 


The SYSTEM/IDA program may be initiated from a remote terminal as well as from the ODT. 
Initiation from a Remote Terminal 


There are three ways to initiate a run of the SYSTEM/IDA program from a remote terminal: (1) 
EXECUTE, a program control instruction, (2) PASS, an SMCS command, or (3) ON, an SMCS com- 
mand. 


Using EXECUTE 


The user transmits EXECUTE (or EX), receives the BOJ, REMOTE FILE OPENED, and Welcome 
messages, transmits a GET command, and receives the output from the GET command. 


Example: 


EX SYSTEM/IDA 
SYSTEM/IDA =1900 BOJ. PP=4, MP=4 TIME =13:319:31.7 
REMOTE FILE OPENED BY "'SYSTEM/IDA", SIGNAL = * 
-- Ready for INPUT (type HELP for help) -- 

GET SYSTEM/DUMPF ILE 
[output resulting from entry of GET command] 


Using PASS 


The PASS command may be used if the SYSTEM/IDA program has been entered in the SMCS Jobs 
file. The user transmits the PASS command with a GET command appended. A MESSAGE QUEUED 
message followed by the output from the GET command is received. 


Example: 


PASS SYSTEM/IDA GET SYSTEM/DUMPF ILE 
MESSAGE QUEUED FOR "'SYSTEM/IDA'': WAITING OPEN 
[Output resulting from entry of GET command] 


Using ON 


The ON command may be used if the SYSTEM/IDA program has been entered in the SMCS Jobs 
file. The user transmits the ON command with a GET command appended. A Welcome to the 
SYSTEM/IDA program message followed by the output from the GET command is received. 


Example: 


ON SYSTEM/IDA GET SYSTEM/DUMPFILE 
~- Welcome to SYSTEM/IDA -- 
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Initiation from the ODT 


There are three ways to run the SYSTEM/IDA program from the ODT. One way is by entry of the 
PM system command. The other two ways are two different modes of using the EXECUTE program 
control instruction. 


Using PM 


The user transmits a PM command with a FILE program control instruction appended, directing the 
packaged dump file to a user disk. 


Example: 


PM; FILE PM NAME PACKX/PACKAGE/DUMPF ILE 


Using EXECUTE 
There are two ways of using the EXECUTE program control instruction from the ODT. 

1. The user transmits an EXECUTE (EX) command with a FILE program control instruction to 
rename the DUMPFILE file as the previously packaged system dump file. An AC program con- 
trol instruction containing a pair of SYSTEM/IDA program control commands is included to 
print the disk descriptor chain and then terminate. 


Example: 


EX SYSTEM/IDA; FILE DUMPFILE NAME PACKX/PACKAGE/DUMPF ILE; 
AC PRINT DISK;BYE 


2. The user transmits an EX command and receives a BOJ and a Welcome to SYSTEM/IDA mes- 
sage. The SYSTEM/IDA program waits for transmission of an AC or AX system command 
containing an SYSTEM/IDA command and then displays the requested information. 


Example: 


EX SYSTEM/IDA; 
SYSTEM/IDA =1566 BOJ. PP=4, MP=4 TIME = 09:45:10.6 
4 SYSTEM/IDA =1566 -- Welcome to SYSTEM/IDA -- 
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Scroll Mode 


The SYSTEM/IDA program enters scroll mode when a SYSTEM/IDA command is given to display 
information that requires more than one display page. In this mode, the OPTION LINESPERSCREEN 


control command is enabled. 


The commands listed in table 2-1 are recognized in the scroll mode. All other commands terminate 
scroll mode. 


Table 2-1. SYSTEM/IDA Scroll Mode Commands 


Command Function 


+ [<increment> ] Move forward (backward) one page or the number 
— [<decrement > ] of lines specified by <increment> (<decrement>). 


1 Display the first page. 

$ Display the last page. 

<line number > Display the page that begins at <line number>. 
HELP Display the current and ending line number 


and the command menu. 


OPTION (O) Display the current option settings. 
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CONTROL COMMANDS 


Control commands are used to control the execution of the SYSTEM/IDA program. They may be used 
to select a current version of a current job, current environment, current file, and so forth, as well 
as to provide formatted displays of portions of the dump file and to to terminate execution of either 
a single command or the overall SYSTEM/IDA program. They also provide user assistance by enabling 
the display of a command menu as well as syntaxes of individual commands. 


Table 2-2 is a list of control commands that may be used to select items for display. Following the 


table are the individual control command descriptions. 


Table 2-2. Control Commands for Use in Displaying Items 


Command Item Selected 
GET Dump file 


JOB Job and environment 


ENVIRONMENT Environment of current job 


FILE File of current job 

LAYOUT Procedure frame and variable of current 
environment 

MEMORY Memory address in data for current 
environment 

OPTION Options 
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BYE 
The BYE control command terminates the SYSTEM/IDA program. The dump file is not removed. 


Syntax: 


BY i ___f 


nNQ 
t 
ON 
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ENVIRONMENT 
The ENVIRONMENT (E) control command selects a current environment and displays information 
about the environments of the current job. If no parameters are included, the environment dictionary 


for the current job is displayed. 


Syntax: 


— ENVIRONMENT 


a4 


> < number > 


- LAYOUT 
FILE <title > 


SMACHINE < interpreter name > 


Semantics: 


<mnumber > 
This field is used to select a current environment. 


LAYOUT 
The LAYOUT parameter specifies that the layout table is to be loaded from the codefile named 
in the Run Structure Nucleus (RSN) for the current job, rather than from the dump file. This 
capability is useful when entering the LAYOUT command results in the message: 


** Error: Job <Number>: LAYOUT TABLES NOT PRESENT 


If FILE <title> is included, the layout table is to be loaded from the codefile specified by 
<title> rather than from the dump file. The <title> must be in the form A/B ON C. 


SMACHINE <interpreter name> 
SMACHINE <interpreter name> specifies the first name of the interpreter for the current job. 
It is entered to facilitate analysis of a program that used an interpreter with a non-standard first 
name. 


Examples: 


E 1 
E LAYOUT 
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FILE 


The FILE control command selects a current file and displays information about files associated with 
the current job. If no parameter is included, the first page of the File Information Block (FIB) of the 
current file is displayed. 


Syntax: 

—— FILE + 
— SUMMARY 
——- < number > 

Semantics: 


SUMMARY or 8S 
The SUMMARY (or S) parameter causes the file dictionary to be displayed. 


< number > 
This field is used to select a current file and causes the first page of the FIB to be displayed. 


Examples: 


FS 
FILE 2 
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GET 


The GET control command selects a current dump file, selects the first job as the current job, and 
displays some general information about the dump file. If a system dump file is selected, the MCP 
(JOB 0) is selected as the current job. If no parameter is included, general information about the cur- 
rently selected dump file is displayed. 


Syntax: 
— GET 
<title> — 
< number > 
Semantics: 
<title> 


This field is used to select a current dump file. The SYSTEM/IDA program determines whether 
it is a system dump file, program dump file, or packaged system dump file, and performs version 
checking. <title> must be in the form A/B ON C. 


< number > 
When this field has a zero value, the SYSTEM/DUMPFILE file is selected as the current dump 
file. When the field has a non-zero value, DUMPFILE/< number > is selected as the current dump 
file. 
If a prior dump file had been selected, it is closed but not removed. 

Examples: 


G 0 
GET DUMPFILE/PM ON S 
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HELP 


The HELP control command displays either the menu of commands or the syntax of the specified com- 
mand. 


If the SYSTEM/IDA program is in the scroll mode, the following message is included, where <cur- 
rent> is the number of the current line and <last> is the number of the last line in the scroll buffer. 


YOU ARE SCROLLING AT LINE <current> OF <last> 


If no parameter is included, the menu of commands is displayed, along with the current patch level 
compile date. 


Syntax: 


ciacelk nes een 
< command > 


Semantics: 

< command > 
This field may contain any control command, program object command, or system object com- 
mand. 

Examples: 


HELP 
HELP LAYOUT 
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JOB 


The JOB control command selects a current job and a current environment and displays information 
about the job. This command is only available in system dumps. The job may be either the MCP or 
one of the jobs in the mix. 


If no parameter is included, the mix summary is displayed. 


Syntax: 
—— JOB 
SUMMARY - 
< number > 
+ 
Semantics: 
SUMMARY 


The SUMMARY parameter displays the mix summary. 


< number > 
This field is used to select a current job. The SYSTEM/IDA program selects the active environ- 


ment for that job as the current environment and displays the state of the job. 
When this field has a zero value, the MCP is selected. 


When this field has a non-zero value, a job in the mix is selected. 


+ 
The + parameter is used to select the next job as the current job. If the MCP was the current 
job, the first job in the mix is selected. If a job in the mix was the current job, the next job 
in the mix is selected. 

Examples: 
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LAYOUT -— SDL2 Program 


The LAYOUT control command is used to select a current procedure frame, to select a current 
variable, and to display a history of procedure calls and information about the variables and arrays 
accessible to the procedures of the current job. 


The layout tables are a representation of the variable and array declarations. They provide the template 
for the SYSTEM/IDA program to interpret the contents of a dump file. 


This command includes the concept of a current procedure frame and a current variable. A current 
procedure frame is selected by transmitting LAYOUT <number>. A current variable is selected by 
transmitting LAYOUT VAR <name>. If no current variable has been selected, subsequent LAYOUT 
commands analyze all variables in a frame. 


The LAYOUT command does many things, depending on the state of the analysis. These things can 
best be described programmatically: 


1. If the layout tables for the current job are not loaded, load the layout tables. 
2. If a SUMMARY parameter is present, display the layout summary. 
3. If a SUMMARY parameter is not present, consider the following: 

If a <number> field is present, select a current procedure frame. 


If a VAR <variable name> is present, select a current variable. If VAR parameter is present 
without a variable name, clear the current variable. 


If there is a current variable search for the current variable within the current procedure frame, 
display the value. If the ADDRESSES switch is set, the addresses are displayed. 


If the SIMPLETYPES switch option is on, it is temporarily turned off for variable analysis by the 
LAYOUT VAR form of this control command. 


Syntax: 


—— LAYOUT SUMMARY —————————_—————  ——— — 


VAR ee 
<i name > 


<address > 


< range > 


Syntax for <address>: 
—~— CC 
@ <number> @ ABS 
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Syntax for <range>: 


————- + ( <number > {a | 
——- <number > 


Semantics: 


SUMMARY 


The SUMMARY parameter displays a history of procedure calls that shows the flow of control 
from the global procedure to the last procedure called. 


< number > 
This field is used to select a current procedure frame. 


VAR 


This parameter is used to select a current variable and turn on the search mode, or to clear the 
current variable and turn off the search mode. 


<name> 
When this field is present, a current variable (or array) is selected. 


When this field is not present, the current variable is cleared. 
< address > 


When this field is present, the <name> field is used as a template to interpret the contents of 
location <address>. 


The <address> field is a decimal address if it is not bounded by at-sign (@) characters. It is 
a hexadecimal address if it is bounded by at-sign characters. 


The <address> field is relative to the base register of the current job if it is not followed by 
the ABS keyword. It is an absolute address if it is followed by the ABS keyword. 


<range > 
When this field is present, it is used to specify a single array element or a range of array elements 
to be displayed. 
When a single number is included, it specifies the subscript of the array element to be displayed. 


When two numbers are included, they specify the subscripts that bound the range of array 
elements to be displayed. 


Examples: 


V HINTS 0 ABS 
TABLE (1 10) 
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LAYOUT — WEL Program 


A subset of the LAYOUT control command is available for Work Flow Language (WFL) program 
analysis. The VAR parameter is not available. 


Syntax: 
—— LAYOUT —~—————— + 
— SUMMARY - 
< number > 
Semantics: 
SUMMARY 


The SUMMARY parameter displays a history of procedure calls that shows the flow of control 
from the global procedure to the last procedure called. 


< number > 
This field is used to select a current procedure frame. 
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MEMORY 


The MEMORY control command selects a current memory address, displays an unformatted analysis 
of memory, and displays a formatted analysis of a memory link. 


If no parameter is included, the display shows the contents of memory at the current address. 


Syntax: 


— a ies nae 
+ < address > 


- DvD > OO FT 


Syntax for <address>: 

a ie <number> —=— ————_--—-__—____| 
@ <number> @ _| 

Semantics: 


address 
This field establishes a current address. The address may be specified in decimal or hexadecimal 
notation. Hexadecimal addresses are enclosed in at sign (@) characters. 


H 
The H keysymbol specifies that memory is to be displayed in hexadecimal representation. 
C 
The C keysymbol specifies that memory is to be displayed in character representation. 
A 
The A keysymbol specifies that all subsequent addresses are absolute. This is the default mode 
for system dump files and invalid for program dump files. 
R 
The R keysymbol specifies that all subsequent addresses are relative to the base register of the cur- 
rent job. This is the default mode for program dump files. 
L 
The L keysymbol displays the system memory link for the current address (system dumps only). 
+ 


The + keysymbol increments the current address by either one page or by the number of bits 
specified by the following <address>. 
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The — keysymbol decrements the current address by either one page or by the number of bits 
specified by the following <address>. 


L + 
The L + keysymbols change the current address to the address of the forward memory link and 
display the link. 


L aie 
The L — keysymbols change the current address to the address of the backward memory link and 
display the link. 

Examples: 


M C 1400 
M H + 100 


M R 0 
MC + 
M L @345678@ 
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OPTION 

The OPTION control command allows the entry of options for displaying information. The entry of 
OPTION alone displays the current option settings. The options are of two types, switch options and 
value options. See Switch Options and Value Options. 


For further information on options, see Switch Settings, later in this section. 


Syntax: 
—- OPTION ———— 
on < switch option > 
NO 
< value option > 
Semantics: 
NO 


Turns off the switch option that follows. 


<switch option > 
See Switch Options. 


<value option> 
See Value Options. 


Switch Options 
All switch options except UPPERCASE and CODECHECK are initially off. 


Syntax: 


ADDRESSES —— ere eee a ane or eet + 
CODECHECK ——— 

DOUBLESPACE — 

LIST 

NEWLINE 

RESTOREBUFFER — 


SIMPLETYPES —— 


UPPERCASE 
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Semantics: 


ADDRESSES 
The ADDRESSES switch option adds the memory addresses of variables to the output of the 
LAYOUT control command. 


CODECHECK 
The CODECHECK switch option enables comparison of code files in the dumpfile with the corre- 
sponding code files on disk by the PM command. 


DOUBLESPACE 
The DOUBLESPACE switch option specifies that subsequent printer output is to be double 
spaced. 


LIST 
The LIST switch option specifies that all succeeding output is to be written to the LINE file in 
addition to the USER file or ODT. 


NEWLINE 
The NEWLINE switch option specifies that the cursor is to be left at the start of the second line 
instead of at the HOME position. This capability facilitates repeated + commands when in scroll 
mode. 


RESTOREBUFFER 
The RESTOREBUFFER switch option restores the prior scroll buffer if any. 


SIMPLETYPES 
The SIMPLETYPES (may be abbreviated ST) switch option suppresses analysis of record fields 
and array elements by subsequent LAYOUT commands. 


Note that if the SIMPLETYPES switch option is on, it is temporarily turned off for variable anal- 
ysis by the LAYOUT VAR form of the LAYOUT control command. 


UPPERCASE 
The UPPERCASE switch option specifies that output is to be in uppercase only. 


Value Options 
Each value option has a default value, specified in its description. 
Syntax: 

— ARRAYLIMIT ———— 


LINESPERSCREEN 
—— NESTLIMIT ————— 


2 as rs 
NO = <title> 


<number > 
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Semantics: 


ARRAYLIMIT 
The ARRAYLIMIT value option either interrogates or changes the number of array elements 
analyzed by the LAYOUT command. The default number of array elements analyzed is 64. If 
<number> is not specified, the current value of the option is interrogated and displayed. The 
<number> parameter is used to change the number of array elements analyzed. 


LINESPERSCREEN 
The LINESPERSCREEN value option is valid only in scroll mode. The option either interrogates 
or changes the number of lines per page in scroll mode. The default value of the option is 22. 
If <number> is not specified, then the current value of the option is interrogated and displayed. 
The <number> parameter is used to change the number of lines per page. 


NESTLIMIT 
The NESTLIMIT value option controls the format of variables analyzed by the LAYOUT com- 
mand by restricting analysis to a maximum nest level. 


LINE 
The LINE value option either interrogates or changes the title of the LINE file. The default title 
of the LINE file is LINE. If <title> is not specified, the current title of the LINE file is interro- 
gated and displayed. The <title> parameter is used to change the title of the LINE file. The 
<title> must be in the form A/B ON C. A NO entry preceding the LINE option closes the LINE 
file. 
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PM 


The PM control command reads the current dump file and writes the PM file in order to produce 
a packaged dump file. The default name of the PM file is DUMPFILE/PM<nnn>, where <nnn> 
is the next BACKUP file number assigned by the system. 


The default name of the PM file can be overridden by inclusion of a FILE program control instruction 
when the SYSTEM/IDA program is executed. 


A packaged dump file is used when the analysis is not scheduled to be performed immediately or when 
analysis is scheduled to be performed on a different system. 


syntax: 

aid CRN an ie: 
NO CODECHECK 

Semantics: ; 


NO CODECHECK 
The NO CODECHECK keywords eliminate checking for code segment comparison errors between 
the code segments in the dump file and the corresponding code segments on disk. This option 
should not be used for dumps submitted with Field Communication Forms (FCF). 


Examples: 


PM 
PM NO CODECHECK. 
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PRINT 


The PRINT control command either writes a formatted analysis of the current dump file or writes the 
output of the specified command to the LINE file. 


Syntax: 
—— ee 
< command 
Semantics: 
<command > 


This field may contain any command except PRINT. All output associated with the command is 
written to the LINE file. 


Pragmatics: 


When certain commands are included with no parameters, their normal display output is enhanced. 
Those commands and the corresponding enhancements follow. 


Inclusion of the FILE command prints the file dictionary and the FIB for each open file. 
Inclusion of the JOB command prints the job summary and the state of each job in the mix. 


Inclusion of the LAYOUT command prints the layout summary and the contents of each procedure 
frame. 


Inclusion of the MEMORY command prints an unformatted analysis of memory for the current job, 
along with any memory links present. 


Inclusion of the SMACHINE command for SDL2 job prints the SDL2 S-machine summary and the 
output from the CONTROL, DISPLAY, LAYOUT, NAME, PROCEDURE, and VIRTUAL 
parameters. 


Examples: 


P 

PLS 

P DISK 

P JOB 567 
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SMACHINE 


The SMACHINE control command displays SMACHINE information about the current environment 


of the current job. 


For SDL2 environments, if no parameter is included, a SDL2 S-machine summary is displayed giving 
the addresses of the value, evaluation, procedure, and control stacks and of the name and display ar- 


rays, followed by a brief analysis of any virtual memory usage. 


For non-SDL2 environments, no parameters are used. The local data area is analyzed, as it was in 


the past, by the DUMP/ANALYZER program. 


Syntax: 


—— SMACHINE 
<id> 


< address > 
———- DISPLAY _ BASE < address > 

MIRTUAL 
— <address > 


Syntax for <id>: 


- CONTROL 
— DISPLAY 


LAYOUT 
NAME 


PROCEDURE —— 


Syntax for <address>: 


Le < number > ee es 
@ <hex> @ 
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Semantics: 


CONTROL 
The CONTROL parameter displays a formatted analysis of the control stack. The <address> 
field may be used to change the address of the control stack when the starting address has been 
corrupted. 


DISPLAY 
The DISPLAY parameter displays a formatted analysis of the display array. The <address> field 
may be used to change the address of the display array when the starting address has been cor- 
rupted. 


LAYOUT 
The LAYOUT parameter displays a formatted analysis of the data described by the name array 
entries. 


NAME 
The NAME parameter displays a formatted analysis of the name array. The <address> field may 
be used to change the address of the name array when the starting address has been corrupted. 


PROCEDURE 
The PROCEDURE parameter displays a formatted analysis of the procedure stack. The <ad- 
dress> field may be used to change the address of the procedure stack when the starting address 
has been corrupted. 


DISPLAY__BASE <address> 
The DISPLAY__BASE parameter changes the address of the base of the display array to <ad- 
dress>, thus changing the procedure stack base as well. 


VIRTUAL 
The VIRTUAL parameter displays a formatted analysis of virtual memory. 


VIRTUAL <address > 
When the VIRTUAL parameter is followed by an <address> field, a formatted analysis of the 
memory link at <address> is displayed. 


Examples: 
SP 


S VIRTUAL 
S V @ASB6C7@ 
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?BRK 


The ?BRK control command terminates processing of the current command. 


Syntax: 


-——? BRK 
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PROGRAM OBJECT COMMANDS 


Program object commands display data that is available both in program dump files and in system 
dump files. Program object commands that require more than one display page force SYSTEM/IDA 
into scroll mode. All program object commands apply to the current job. 


Syntax: 
— DATA oe a ee $$ 
DICT 
sEGS ———_____—_—__—__ 
INTERP 
ESN 
= COMMUNICATE 
FIB — 
| DICT ——----——__—— 
FPR ———_____-_ - - +--+. +> 
[PC a a 
tl id © 2 en 
RSN Se ee 
-EVENTLIST ———————_ 
INTEGRITY ———— 
‘OVERLAY 
TASK 
SAD 
DATA 


Displays the Data Dictionary, Data Segments, or Interpreter Data for the current environment. Data 
Segments are only available in a program dump. 


ESN 
Displays the Environment Structure Nucleus for the current environment. 


ESN COMMUNICATE 
Displays the Communicate message for the current environment. 
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FIB 


Displays the File Information Block for the current file. The FIB command displays the same informa- 
tion as the FILE <number> control command. 


FIB DICT 
Displays the FIB Dictionary. The FIB DICT command displays the same information as the 
FILE SUMMARY command. 


FPB 


Displays the File Parameter Block for the current file. The FPB command is only available in program 
dump files. 


IPC 

Displays the Inter-Program Communication information for the current job. 
PPB 

Displays the Program Parameter Block. 

RSN 

Displays the Run Structure Nucleus. 


RSN EVENTLIST 
Displays the event list. 


RSN OVERLAY 
Displays the overlay descriptor. 


RSN INTEGRITY 
Displays the results of a RSN integrity check. 


RSN TASK 
Displays the task variable table. 


SPAD 


Displays the Scratchpad for the current environment. 
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SYSTEM OBJECT COMMANDS 


System object commands display data that is available only in system dump files. System object com- 
mands that require more than one display page force SYSTEM/IDA into scroll mode. 


Syntax: 


BNA ———_________—__ _—-—___—- —— +--+ 


CHANNELS —————_———-— 


seaeay) eae rere 
CHECK —— 


mi CSV 
DCH 
DFH =————__—__—_- 
DISK  ——__________ 
DMS 

ERRORTABLE 

HINTS 


INTERPS 
IOAT 
IPC RUL 


ALL —— 


- MPB 
NAMETABLE 


DDT 
[-aveve 
DESCRIPTOR - 


ALL 
C74 
QUEUE — <id> 
REMOTE 

STATION [<id>] 
STATE 

TAPE 

TRACE 
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BNA 

Displays the BNA memory area. 

CHANNELS 

Displays the I/O channel tables. 

CODE 

Displays the code dictionary for the current environment. 


CODE CHECK 
Displays the code comparison errors. 


2SV 

Displays the cold start variables. 

DCH 

Displays the active data communication channels and network controller information. 


DFH 


Displays the disk file header dictionary. 


DISK 

Displays the disk descriptor chain and extended result descriptor chain. 
DISK S 

Displays only disk descriptors those not yet completed and those in error. 
DMS 

See DMS Commands. 

ERRORTABLE 


Displays the correctable error table. 
HINTS 


Displays the Hints record. 


HINTS COMM 
Displays the communicate splitter mask for routing program communicate messages to either the 
SMCP or the MMCP. 


HINTS DCPU 
Displays the DCPU information and the lock management data. 


HINTS TT 
Displays the truth table for marking the patch level of the SMCP. 
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INTERPS 

Displays the Interpreter Dictionary. 

lOAT 

Displays the Input-Output Assignment Table (IOAT). 

IPC RUL 

Displays the Inter-Program Communication Run Unit List. 
LINKS 


Displays a general analysis of system memory links, a memory usage summary, and a specific analysis 
only of bad system memory links. 


LINKS ALL 
rie a general analysis of system memory /inks and a specific analysis of each system memory 
MPB 
Displays the MCP Parameter Block. 
NAMETABLE 
Displays the name table for system software names and disk addresses. 
ODT 


Displays the ODT queue starting with the most recent entries. 


ODT QUEUE 
Displays the same information as the ODT command. 


ODT DESCRIPTOR 
Displays the ODT descriptor chain, the ODT buffer, and the ODT/SQUASH globals. 


PACKS 

Displays the disk cartridge/pack information tables. 

PSR 

Displays the Pseudo Reader Information. 

QUEUES 

Displays the queue information global parameters. and queue descriptors. 


QUEUES ALL 
Displays all queue descriptors. 
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QUEUES C74 
Displays only COBOL74 datacomm queue descriptors. 


QUEVES QUEUE-<id> 
Displays all queues with the given multifile-id. 


QUEUES REMOTE 
Displays only file queue descriptors. 


QUEUES STATION [LSN] 
Displays station queues. If an LSN is specified, displays that station only. 


STATE 


Displays the processor state including the interrupt queue, the GISMO work area, the master and slave 
processor scratchpad registers and A-stack, and the master and slave processor MMCP data. 


TAPE 
Displays all tape descriptor chains. 
TRACE 


Displays the GISMO trace table. 
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DMS COMMANDS 


DMS alone was the only valid DMS command in the previous release. Now, DMS entered alone returns 
the following message: 


**W ARNING** the DMS command is no longer valid. Try DMS HELP 


For the 12.0 release, there are twelve DMS commands, as shown in the syntax diagram and the descrip- 
tions that follow it. 


Syntax 


—— DMS 


1152055 


ALL 


NO BUFFERS 
AUDIT 


BUFFER ———— we 
- u TOUCH BITSON !: 
<areanumber> < block number> 


CURRENT —— 
| < job number> <invoke number> 
DATABASE —— 
& < database name> 
SELECTONLY 
HELP —_— Moi 


JOB ass Teen aacnmiam 
< job number> 


SELECTONLY 
JOB BUFFER — 
< areanumber> < block number > 
JOB CURRENT 
< invoke number > 
JOB STRUCTURE 


STRUCTURE als eee ts aden ee ee ae 
< structure number > 


SELECTONLY 
SUMMARY —-————-—_____________________--__--—_—- —_ 


— 
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DMS ALL 


For each opened data base, this command displays the DMS globals and the audit FIB as well as the 
two I/O descriptors belonging to the data base. For each opened structure, the following is displayed: 


@ The structure record. 
@ All the current records. 


° If SWITCH2 is less than 3, all the buffer descriptors. Moreover, if the structure is an index 
(INDEX SEQUENTIAL or INDEX RANDOM), the tail part of each buffer is displayed. 


® If SWITCH2 equals 0, and NO-BUFFERS has not been specified in the DMS command, and 
a print has been requested (PRINT DMS ALL), all the buffers are printed in hexadecimal. 


DMS AUDIT 


The audit command displays the audit FIB and the memory address of the buffers. If disk is the audit 
file medium, the disk file header is also displayed. 


DMS BUFFER 


To use this command, a data base and a structure must first be selected. (See the DMS DATABASE 
and DMS STRUCTURE commands.) 


DMS BUFFER 
Displays, for each buffer belonging to the selected structure, the logical address, the touch bits, 
the user count, and the status flags: media (Bd__in__memory), to be written, control point, and 
I/O error. Figure 2-1 is an example of the display. 


DMS BUFFER “TOUCH BITS ON’ 
Displays all buffers with touch bits not equal to zero. 


DMS BUFFER <area number> <block number> 
Displays the front part of the buffer (Buffer__descriptor) and the address of the buffer itself. If 
the structure is an index, the tail part of the buffer (Buffer__end__descriptor) is also displayed. 


To see the contents of the buffer, enter the MEMORY control command. (See MEMORY, in this 
section.) 


DMS CURRENT 


To use this command, a data base and a structure must first be selected. (See the DMS DATABAS 
and DMS STRUCTURE commands.) 


DMS CURRENT 
Displays each current with its job number, invoke number, and locks. Record number is relevant 
for lists and datasets only. Entry number is relevant for lists and indexes only. Figure 2-2 is an 
example of the display. 


DMS CURRENT <job number> <invoke number> 
Displays the entire current. 
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DMS DATABASE 


Displays each data base with a list of the jobs using it. For each job listed, the full name (pack id, | 
mfid, fid) and the job number are displayed. Figure 2-3 is an example of the DMS DATABASE dis- 
play. 


DMS DATABASE <database name> 
Displays a single data base and provides additional information about it. The pack name is not 
needed because DMS prohibits two data bases with the same name, even if they are on different 
packs. If the data base name contains odd characters, for example: 2M™WDB, the data base name 
must be enclosed in quotes. 


The named data base is selected as context for subsequent commands, and the DMS globals record 
is displayed. 


DMS DATABASE <database name> SELECTONLY 
Allows the selection of a data base without the DMS globals record. The following is displayed: 
DATABASE <database name> SELECTED 
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" to be written control point 
. media !! _1/0 error ? 
"<--addr--> touch oe oe | 

varea block bits user VV VV " 


"123° 12345 @11@ 16 YNYN 
"012 01234 @O0I@ O01 NNNN i‘ 
"001 00123 @00@ 03 YYYY 


Figure 2-1. Example of DMS BUFFER Display 


4 restart lock __ 
e record lock_ ![" 


: user lock. 1! ['! 
aI ! ! {"! 
ii V V vil 
7 <2SSeoe= user current------ ><---working current---~--- > a 
" Saat address-->points at<--address------- >points at ‘ 
Job invoke area blk rec entry area blk rec entry ‘ 
"1234 64 101 345 - 256 nothing 001 001 - 123 next YN yi 
"h321 63 001 O01 010 - current 101 345 123 = prior N YN" 
iu user lock 1! !" 


Figure 2-2. Example of DMS CURRENT Display 


u xkkeX Data base <database name> **x**x " 
i tt 


user count : 5 " 
a update user count : 3 
i. updated : YES " 
M programs ok : YES 4 
u recovery in process : NO _ 
vy reorganization running : NO " 
s globals lock : NO u 
i audit lock : YES a 
ut transaction lock : YES " 
4 recovery in process : NO a 
u reorganization in process : NO , 
saa name----- > job nbr : 
" a/b/c 1234 " 
'" d/e/f 4321 T 


Figure 2-3. Example of DMS DATABASE Display 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
The System/IDA Program 


DMS HELP 


This command is context sensitive; that is, its output depends on preceding commands. Syntax as well 
as instructions are provided. 


DMS JOB 
To use this command, a data base must first be selected. (See the DMS DATABASE command.) 


DMS JOB 
Displays the names and numbers of the jobs using the selected data base. For each job, the full 
name (pack id, mfid, fid), number, actual environment, job status, and relevant flags are dis- 
played. Figure 2-4 is a sample display. If the job is rolled out, the flags are not displayed; instead, 
the message "Job Rolled Out” is displayed. 


DMS JOB <job number > 
Displays the DMS interface area of the specified job. 


DMS JOB <job number> SELECTONLY 
Selects the specified job, without displaying the interface, and responds with 


JOB <job number> SELECTED 
DMS JOB BUFFER 


To use this command, a data base, a job, and a job structure must first be selected. (See the DMS 
DATABASE, DMS JOB, and DMS JOB STRUCTURE commands.) The command is similar to DMS 
BUFFER but operates in a different context. 


DMS JOB BUFFER 
Displays all the buffers belonging to the currents for the selected job and job structure. For each 
buffer, the logical address, the touch bits, the user count, the flags, and the entry number are 
displayed. For indexes, only the entry number is relevant; for lists, both record number and entry 
number are relevant. 


DMS JOB BUFFER <area number> <block number> 
Displays the contents of the buffer specified. 


DMS JOB CURRENT 


To use this command, a data base, a job, and a job structure must first be selected. (See the DMS 
DATABASE, DMS JOB, and DMS STRUCTURE commands.) This command is similar to the DMS 
CURRENT command but operates in a different context. 


DMS JOB CURRENT 
Displays all the currents and, for each current, the invoke number, the logical address (consisting 
of the area number, block number, and record number), the entry number, and the locks. 


DMS JOB CURRENT <invoke number > 
Displays the entire current. 
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DMS JOB STRUCTURE 


To use this command, a data base and a job must first be selected. (See the DMS DATABASE and 
DMS JOB commands.) The DMS JOB STRUCTURE and DMS STRUCTURE commands are similar 
but work in different contexts. 


DMS JOB STRUCTURE 
Displays all the structures that are in use by the job specified. For.each structure, the structure 
number, user count, update user count, structure type, parent structures, object structures, and 
some locks are displayed. 


DMS JOB STRUCTURE <structure number > 
Causes the specified structure to be selected as context for subsequent commands and displays the 
structure record, file record, and disk file header. 


DMS JOB STRUCTURE <structure number> SELECTONLY 
If the user wants to select a structure and does not want any more information, the reply is: 


STRUCTURE <structure number> SELECTED 
DMS STRUCTURE 


To use this command, a data base must first be selected. (See the DMS DATABASE command.) 


DMS STRUCTURE 
Displays all opened structures, giving the structure number, user count, update user count, struc- 
ture type, parent structure number, object structure number, and some locks. Figure 2-5 is an ex- 
ample of the display. 


DMS STRUCTURE <structure number > 
Displays the structure record, the file record, and the disk file header. The structure is selected 
as the context for subsequent commands. 


DMS STRUCTURE <structure number> SELECTONLY 
Selects a structure and gives the following response: 


STRUCTURE <structure number> SELECTED 
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u fatal error 
H in transaction 
HN | am aborting 


! 
1! 
se aborted 1: 
” backing out rr! 
ae updat.ing !rer?td 
se opened update Prrd?d! 
. Prrdrdordt 
" VVVVVVV 
"name nbr- env <--status-~-> 
' a/b/e 1234 usr waiting DS/DP YNNNNNN 
" d/e/f 4321 dms executing YYYYYYY 
" g/h/i 0123 mcp executing YNYNYNY 
ROLLED OUT 


il 
" 
EI 


i eae structure------- >» <““users-=—> <=--+==--+- locks =<-<=4=-s-->+> 

: type nbr object parent all upd memory buffer cur_link currents" 
" MSS 4& 1023 1022 10 3 Y Y N N 
"-RSDDS 7 1021 1020 O 0 Y Y Y Y (EX) 
"EDS 1 1019 1018 11 1] N N N yao 
"IDXSEQ 6 1017 1016 3 1 N Y N Y (02 


Y (EX) means exclusive lock. 
Y (xx) means non-exclusive lock with xx users. 


Figure 2-5. Example of DMS STRUCTURE Display 
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DMS SUMMARY 


This command produces a display that provides an overview of what was going on when the dump 
was taken. The display includes the summary information for data bases, structures, and currents. 


Each data base name is displayed. For each, the user count and other summary information is in- 
cluded, along with the locks (global, audit, and transaction). 


For each data base name, all the structures in memory are shown. For each structure, the locks (buffer 
lock, current lock, current link lock), the type, user count, update user count, object structure, parent 
structure, and the currents are shown. 


For each current, the job number, the invoke number, the logical address, and the user lock are shown. 


Figure 2-6 is an example of the display. 


: keKKK Data base <database name> *x*xx . 
= user count 
update user count 
: updated : 
re programs ok 
" recovery in process : 
reorganization running 
_ globals lock 
“ audit lock 
: transaction lock 
*k Structure <structure number> *%* 

a type= INDX RANDOM user cnt=12 update user count=10 
" buffer lock=Y current lock=Y (EX) current link lock=Y 
” object structure = 7 parent structure = - 

" * Currents * 

_ restart lock_ " 
" record lock_ |!!! 


=z wo 
So 


: user lock_ |! !! 
tt ! ] t" 
it V V yi 
" greece user current------ ><---working current------- > " 
Kroc --- address-->points at<--address------- >points at ee 
Job invoke area blk rec entry area blk rec entry 
"1234 64 101 345° - 256 nothing 001 001 - 123 next YN Y'! 
"h321 63 001 001 010 - current 101 345 123 - prior N Y N" 


vtec means exclusive lock. 
Y (xx) means non-exclusive lock with xx users. 


Figure 2-6. Example of DMS SUMMARY Display 
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SWITCH SETTINGS 


Following are the SYSTEM/IDA program switch settings. In all cases, zero is the default setting. 


Switch Settings | 
0 0 = Analyze only the first 64 elements of each array. 
1 = Analyze all elements of each array. 
2-15 = Do not analyze arrays. 


] 0 = Allow comparison of resident code, interpreter, and 
microcode segments to their copies on disk. 
1-15 = Suppress code segment comparison. 


2 0 = Display DMS and ISAM buffers. 
1 = Suppress DMS and ISAM buffer data only. 
2-15 = Suppress DMS and ISAM buffer descriptors and data. 


3 0 = Suppress printing of certain (already analyzed) memory 
areas during the hexadecimal dump. 
1-15 = Print all areas of memory during the hexadecimal dump. 


L 0 = Remain in loop until exit conditions are satisfied. 
1-15 = Decrement SW 4 and exit loop unconditionally. The 
semantics of this switch are functionally the same 
as those of the corresponding switch in the 
MCPt!/ANALYZER program. 


5 0 = Analyze all ODT queue entries. 
1-15 = Analyze only the last 25 percent of the ODT queue. 


6 0 = Print available memory areas during hexadecimal dump. 
] = Suppress printing of available memory areas. 


Reserved for future use. 


8 0 = If incorrect MCP level, abort analysis. 
1-15 = Attempt analysis regardless of MCP level. 


Default option UPPERCASE = ON. 

Default options UPPERCASE and DOUBLESPACE = OFF 
Default options UPPERCASE and DOUBLESPACE = ON 
Default option DOUBLESPACE = ON 

Same as setting 1. 
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EXCEPTION CONDITIONS 


The SYSTEM/IDA program informs the user upon the detection of corruption in the dump file. The 
user may then decide how much analysis is worthwhile. 


When an exception situation is encountered, a message describing the problem is displayed, followed 
by a menu of possible user responses, and a request for input. 


FILE NAMES 


Table 2-3 shows the internal and external file names of the files associated with the SYSTEM/IDA 
program and their functions. 


Table 2-3. SYSTEM/IDA File Information 


Internal External 

File Name File Name Function 

LINE LINE The printer output file. 

USER USER The user's remote file. 

DUMPFILE SYSTEM/DUMPFILE The current dumpfile. 

DISK IDA/DISK A temporary work file. 

PM DUMPFILE/PM <nnn> The packaged dump file written 
by the PM control command, where 
<nnn> is the next BACKUP file 
number assigned by the system. 
File equation to tape is 
allowed. 

CEFILE CEFILE A temporary work file. 

CDFILE CDFILE A temporary work file. 

TEXTFILE IDA/TEXTFILE A temporary work file for scrolling. 

LINKFILE LINKFILE A temporary work file. 
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SECTION 3 
OPERATING SYSTEM COMPONENTS 


The Burroughs B 1000 operating system is a modular supervisory program that takes charge of fre- 
quently used functions and thus simplifies and expedites the preparation and running of programs and 
the overall operation of the system. 


The operating system consists of the following three separate components. 


Component Abbreviation 
Master Control Program II SMCP 
MCPII/MICRO-MCP MMCP 
GISMO3 (or GISMO2) GISMO 


These three components perform the following functions: 
e Scheduling, initiating, executing, monitoring, and terminating programs as requested by users. 


e Providing a symbolic means of communicating with the system while shielding users from the 
details of the hardware. 


e Identifying, managing, and retaining memory and disk areas for maintenance of programs and 
files. 


e Managing the system resources for optimum utilization by many concurrent operations. 


The B 1000 operating system components are programs written in the System Development Language 
(SDL2) and the Micro Implementation Language (MIL). 


SDL2 is a high level language used for writing B 1000 system software. SDL2 program instructions 
are performed by the SDL2 interpreter, as opposed to being executed directly on the B 1000 computer 
system hardware. An example of a SDL2 program is the MCPII program, the portion of the operating 
system written in SDL2. 


MIL is the Micro Implementation Language on the B 1000. MIL is a machine level language used for 
writing B 1000 system microcode. MIL programs execute directly on the B 1000 computer system hard- 
ware. An example of a MIL program is the MCPII/MICRO-MCP program, the portion of the operat- 
ing system written in MIL. Other examples of MIL programs are the SDL2 interpreter and GISMO. 


The operating system components are described in the following paragraphs. 
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GISMO (GISMO3 AND GISMOQO2) 


Gismo is a MIL program, executed directly, which contains procedures for the following operating sys- 
tem functions: 


e Processor scheduling. 

e Physical input and output operations. 

e System interrupt handling. 

e¢ Memory allocation under prioritized memory management. 

¢ Communicate message routing. 

e Complex wait (COBOL68, COBOL74, SDL2 WAIT) statement. 
e System performance monitoring. 

e Tracing. 


In a dual processor system, Gismo can execute on either processor. A system of memory locks and 
conventions allows shared access to memory structures. 


MMCP (MCPII/MICRO-MCP AND MICRO-MCP/DEBUG) 


The MMCP is a MIL program, executed directly, which contains procedures for processing the fol- 
lowing communicate messages: 


e Logical input and output operations (record blocking and unblocking). 
¢ COBOL74 interprogram communication. 
The MMCP is also called when a reader/sorter operation completes. 


In a dual processor system, the MMCP can execute on either processor. A system of memory locks 
and conventions allows shared access to memory structures. 


SMCP (MCPII) 


The SMCP is an SDL2 code file, interpreted by the SDL2 interpreter, which contains code for all oper- 
ating system functions except those listed for the MMCP and GISMO. 


The SMCP can only execute on the master processor. 
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SECTION 4 
PROBLEM ANALYSIS OVERVIEW 


The purpose of a system memory dump operation is to find the fundamental cause of a system prob- 
lem. For example a symptom such as a system halt with the L-register = @OD0055@ has, as its imme- 
diate cause an attempt to read or write outside the bounds of memory. Further investigation is needed 
to determine the underlying (fundamental) cause. Further investigation includes a request for a system 
memory dump and the analysis of the resulting system memory dump file. This may (but does not 
always) reveal the fundamental cause. 


When a B 1000 system is not performing any work, the first step is to determine whether it is hung 
or halted. If the system is hung, the next step is to determine what is required to halt it. 


The following paragraphs provide an overview of the steps required to analyze a malfunctioning sys- 
tem. 


IMMEDIATE CAUSE OF A PROBLEM 


The immediate cause of each software controlled system halt is listed in the system halt table contained 
in section 8 of the B 1000 Systems System Software Operation Guide, Volume I. The hardware L-regis- 
ter provides the primary halt definition. For many halts, the T, X, and Y registers contain additional 
information which assists in locating the fundamental cause of the problem. 


The immediate cause of a system hang can be determined by following the instructions that are pres- 
ented next. 


FUNDAMENTAL CAUSE OF SYSTEM HANG 


When a system hangs, the fundamental cause may be determined by going through a sequence that 
takes advantage of what the system does or does not do in response to specific inputs: 


1. System responds to ODT. 

2. System responds to INTERRUPT. 
3. System responds to HALT. 

4. System responds to HALT/CLEAR. 


In the paragraphs that follow, this sequence is described in the order in which the steps should be tak- 
en. 
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System Responds to ODT 


GISMO runs the SMCP, the network controller when using a datacomm ODT, and the SYSTEM/ODT 
program, but no other work is being performed. A probable cause of the problem is that a high- 
priority job with no input or output operations is taking all the processor time. When such a job wants 
the processor, it takes precedence over all jobs of lower priority. 


System performance monitoring or the MX ALL system command followed by repeated 
<.mix number> TI system commands can be used to determine which job has control of the processor. 
Adjusting the priorities of the jobs in the mix may cause other work to resume. If this does not identify 
the cause, interrupt the system, take a clear/start system memory dump, and locate the job whose 
QUEUVUE_ID is NOT__QUEUED. 


System Responds to Interrupt 
The system does not respond to ODT input. 


One possible cause is that the SMCP program is busy and cannot accept requests to perform any other 
services. A job, including the SYSTEM/ODT program, that needs service from the SMCP program 
will wait in the SMCP communicate queue (S_.COMM__Q) until the SMCP can respond. As time goes 
by, more and more jobs cease performing work while they wait for the SMCP. 


Another possible cause is that the priority of either the SYSTEM/ODT program or the network con- 
troller program when using a datacomm ODT has been set lower than some job with no input or out- 
put operations and the latter is taking all the processor time. For this reason SYSTEM/ODT and the 
network controller should be at the highest priority in the mix. Other programs, such as SMCS and 
SYSTEM/MONITOR, can share that priority. 


Another possible cause is that the SYSTEM/ODT program is hung. If SMCS and RD are running, 
it may be possible to use commands from a remote ODT via SMCS and RD to determine the problem. 
Zip input goes directly to the MCP and can bypass an ill SYSTEM/ODT. 


To determine the cause of the problem, interrupt the system and perform a clear/start system memory 
dump. Execute the SYSTEM/IDA program, get the SYSTEM/DUMPFILE file, and verify that the 
SMCP QUEUE__ID is NOT__QUEUED. Then enter the SYSTEM/IDA command LAYOUT SUM- 
MARY to see the history of SMCP procedure calls. 


System Responds to HALT 
The system does not respond to ODT input or to activation of the console INTERRUPT push button. 


One of the interpreters listed in the interpreter dictionary had control of the processor, was stuck in 
a loop, and could not get out to test for any interrupt. A possible cause is a malfunction in the I/O 
subsystem. It may be sending service requests at a rate that does not give GISMO time to exit the 
module that handles service requests to test for other interrupts. 


To determine the cause of the problem, halt the system, record the registers specified in the Fault Do- 
cket, and perform a clear/start system memory dump operation. The value in the A register is the ad- 
dress of the next microinstruction to be executed. That value, together with the information in the in- 
terpreter dictionary, determines which program segment listed in the dictionary had control of the pro- 
cessor. The STATE A @hhhbhhh@ system object command, using the interpreter dictionary, will de- 
code the A register. The values in the other registers provide useful information for determining what 
caused the program segment to loop. 
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If the value in the A-register indicates that GISMO had control of the system, look through the I/O 
descriptor chains in the SYSTEM/IDA listing to determine which descriptors had been initiated. When 
there is a system hang with GISMO in control of the system, the memory dump often fails to show 
the cause of the problem. If the I/O subsystem is suspect, the next step in trying to isolate the cause 
is to run a GISMO ttrace of all I/O channel activity. 


System Responds to HALT and CLEAR 


When HALT and CLEAR must be activated simultaneously to halt the processor, a processor malfunc- . 
tion has occurred, and a Burroughs Field Engineer must be notified. A system memory dump is unnec- 
essary. Perform a clear/start operation, and try to resume processing. 


FUNDAMENTAL CAUSE OF SYSTEM HALT 


If the halt occurred in GISMO, the MMCP, or the SDL2 interpreter, the L-register contains a value 
listed in section 8 of the B 1000 Systems System Software Operation Guide, Volume 1. That value, 
together with any additional information specified as being included in the T, X, and Y-registers, estab- 
lishes starting points for analyzing the system memory dump. For example, when the L-register indi- 
cates a GISMO halt associated with an I/O problem, the starting points are (1) the appropriate I/O 
descriptor chain, (2) the most recent procedure in the SMCP layout summary, (3) the communicate 
message of the program performing the I/O operation, and (4) the FIB for the file being referenced. 


An L= @0D0055@ (D-55) system halt occurs when GISMO discovers an attempt to read out of the 
bounds of addressable memory. This event usually is not detected until some time after it occurs. At 
the time of the halt, if the Y-register contains zero, the error occurred in GISMO. If it contains a 
value other than zero, the X-register contains the contents of the limit register of the program that 
was running when the error occurred. 


WHEN IS ADDITIONAL INFORMATION NEEDED? 


A system memory dump does not always show the fundamental cause of a problem. Examples of such 
cases include problems resulting from to the corruption of a disk address and system hangs for which 
the memory dump fails to show a cause. 


Problems associated with invalid disk addresses are usually caused by an address that became invalid 
long before its reference caused the immediate problem. Frequent execution of the SYSTEM/PANDA 
program may help isolate the time frame within which the corruption occurred. Printouts of formatted 
analyses of the SYSTEM/LOG and the SYSTEM/ELOG may show a pertinent activity sequence and 
any I/O errors that occurred during that time. 


Locating the cause of a system hang frequently is not possible without a GISMO trace. If an I/O chan- 
nel is suspected of requesting the undivided attention of GISMO, a GISMO trace of that channel will 
show it. If there is no specific suspect, a GISMO trace with all trace flags set is the first step in trying 
to locate the cause of the problem. 


WHAT TO DO WHEN THE PROBLEM IS LOCATED 


If hardware is the fundamental cause of a problem, then a Burroughs Field Engineer should be called. 
If the problem is software, the B 1000 Product Support Information Manual (PSIM) may contain a 
corrective measure. 


On the first occurrence of a problem, write a description on a Field Communication Form (FCF) and 
send it, with appropriate supporting documentation, to a Burroughs Software Support representative. 
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SECTION 5 
STATE OF THE SOFTWARE 


The state of the software at the time a system memory dump is taken provides information on the 
job and the operating system component under which it was running. All software-controlled halts oc- 
cur when an operating system component detects invalid data in memory or in a register. The pertinent 
operating system components are GISMO, the MMCP, the SMCP, and the components that are active 
during a clear/start operation (CLEAR/START and SYSTEM/INIT). Knowing which version of an 
operating system component was in use is a key for determining whether the problem has been cor- 
rected with a later release of the system software. 


When the SDL2 interpreter halts the system on behalf of the SMCP, the first two digits of the L- 
register are 00. If the SMCP was performing a service for one of the jobs in the mix, the Job queue 
for the job will be NOT__.QUEUED. The SYSTEM/IDA program object command 
ESN COMMUNICATE applies to the current job and displays the communicate message sent to the 
SMCP. The control command LAYOUT displays the procedure call history and the contents of the 
SMCP name stack. 


When the MMCP halts the system, the first two digits of the L register are 02. The MMCP firmware 
performs services for a job that sends a communicate message. The job queue for the job is 
NOT__QUEUED, and the communicate message is displayed when ESN COMMUNICATE is entered. 


When GISMO halts the system, the first two digits of the L register are OD. For many of the GISMO 
halts, GISMO has been doing some service for the SMCP or the MMCP, and the X register contains 
the contents of the Limit register of the applicable component. The cause of the problem can be traced 
from GISMO back to component and, if necessary, back to the job that sent the communicate mes- 
sage. 


VERSION AND STATE OF THE SMCP 


The SMCP version number and compilation date are displayed in the outputs of the SYSTEM/IDA 
control commands GET SYSTEM/DUMPFILE and JOB 0, as shown in the following example: 


MCP VERSION = MARK 12.0.00 (10/26/84) 


The SMCP state is found in the same display in the field labeled Job queue, which may have any 
of the following values: 


NOT__QUEUED 
The SMCP is running, or GISMO is running on the master processor. 


READY__Q 
The SMCP is ready to resume execution. 


WAIT__Q 
The SMCP is waiting for one or more events in the event list. When the event is TRUE, the SMCP 
is moved to the queue specified by the Next queue field. 
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SMCP EVENT LIST 


The SMCP event list is displayed in the output of the SYSTEM/IDA program object command 
RSN EVENTLIST. The event list is a list containing, typically, two or five entries. 


When the SMCP QUEUE ID is WAIT_Q, and the event list contains five entries, the list shown next 
appears in the SYSTEM/IDA display. 


we EVENT LIST sxx 


EVENT ADDRESS 
0 @7D8c68e FALSE (RS ae EVENT) 
1 @000554@ FALSE (S_M_Q_EV) 
2 @7C379B@ FALSE oacey EMPTY, TO_THE_MCP) 
3 @000552@ FALSE SC Q EV) 
L @00031F@ FALSE (CH ANGE _BIT) 


The meanings of the entries in a five-entry event list are as follows: 

RS__TIME_EVENT 
The SMCP requested GISMO to wake it up after a 5-second to 60-second time interval. The time 
interval is proportional to the number of jobs in the mix. 


The following fields in HINTS and the SMCP run structure nucleus are used. 


HINTS.SYCOUNTER current time 
HINTS.SY__CNTR__MSK time at which wait time expires 
HINTS.SY__PRIOR__TIME last time at which wait time expired 
RS__PAUSE unexpired wait time 
RS__TIME__EVENT caused when time to wake up the job 


When the time interval has elapsed, RS_.PAUSE goes to zero, RS__TIME__EVENT goes TRUE, and 
the SMCP performs some housekeeping functions, including the following. 


** Handle exterminations 
** Perform CHECK__CHANGE__BIT procedure (explained below) 
** Perform N_-SECOND procedure as follows: 
** Roll out jobs 
Update date and time 
** Tnitiate any delayed random I/O operations 
** Load pseudo readers 
** Transfer ELOG 
** Garbage collect queues 
** Fire up SYSTEM/ODT 
** Fire up SYSTEM/BACKUP for autoprint 
If no remote files open for the third time, QC 
the network controller 
DS any job that has exceeded its maximum time 
** Update LOG mix information on the system disk 


** == conditional 
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Q__NOT__EMPTY, ODT__QUEUE__FILE 


An 


input message was transmitted from the ODT, and the SYSTEM/ODT program put the mes- 


sage in the ODT queue. The SMCP deciphers the message and takes the appropriate action. 


S_.M__Q.__EV (SMCP interrupt Message Queue Event) 
GISMO has placed one or more of the following possible entries into the Interrupt queue: 


An I/O operation completed, and the SMCP had requested notification by setting the 
RESULT__STATUS INT__REQ bit in the I/O descriptor, and M_EVENTS INT__M__OR__S 
bit was FALSE. 


An I/O operation completed, and the SMCP had requested notification by setting the 
M__EVENTS S__INT__REQ bit in the I/O descriptor, and M_EVENTS INT__M__OR__S bit 
was FALSE. 


An I/O operation completed, and the SMCP had requested notification by setting the 
M__EVENTS INT__S bit in the I/O descriptor. 


An I/O operation had completed with any exception except datacomm I/O and tape streamer 
tape mark only. All other tape streamer exceptions are routed to the SMCP. 


An S-memory parity error occurred. 


The system is thrashing. 


The SMCP deciphers the interrupt, takes the appropriate action, and then conditionally performs the 
CHECK__CHANGE__BIT procedure. 


Q__NOT__EMPTY, TO__THE__MCP 


An 


input message was transmitted from the ODT, and the SYSTEM/ODT program put the mes- 


sage in the ODT queue. 


S_C_Q_EV (SMCP Communicate Queue Event) 
A communicate message has been routed to the SMCP program. 


Either GISMO routed a communicate message from a program to the SMCP, or the MMCP needs 
help from the SMCP because of a problem described in the RS_M_¥PROBLEM__TYPE field. 


The SMCP performs a Q._.OUT__TOP operation on the S-communicate queue to cause GISMO 
to locate the job that did the communicate. 


The SMCP performs the operation indicated by the communicate message. 
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CHANGE_ BIT 
A job has either entered the schedule, gone to BOJ, or gone to EOJ. 


The SMCP performs the CHECK_.CHANGE__BIT procedure, which was also referenced above 
with RS__TIME__EVENT and S_M__Q_ EV bits fields, as follows. 


If there is a disk squash (SQ system command) operation to be done and no jobs are running, 
execute the SYSTEM/SQUASH program. 


If an OPEN operation has been performed on a remote file and the network controller is not 
running, execute the network controller program. 


If there are jobs in the schedule, and if any jobs in the mix are waiting because of no memory, 
reinstate the jobs; otherwise, execute a job in the schedule. 


When the SMCP Job queue is WAIT__Q, and the event list contains two index-address pairs, the 
RS__TIME__EVENT field is in the event list as described above, and the M__EVENTS.IOC field is 
in the disk descriptor chain as described below. 


The event list could have the following appearance in the SYSTEM/IDA display: 


we EVENT. LIST *#%% 


EVENT ADDRESS 
0 @7E0718@ FALSE (RS_TIME EVENT) 
1 @7DAC4F@ FALSE (M_EVENTS.10C) 


The SMCP dispatched a disk I/O operation to GISMO , and then performed a GISMO communicate 
specifying that the SMCP was to be put into the Wait queue until either 30 seconds elapsed or the 
physical disk I/O operation completed. When the event list contains two entries, the entries have the 
following meanings. 


RS__TIME__EVENT 
This event becomes TRUE when 30 seconds have elapsed (RS__PAUSE field goes to zero) and 
the operation has not completed. 


M__EVENTS.IOC 
This event becomes TRUE when the disk I/O is physically complete. 
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VERSION AND STATE OF THE MMCP 


The MMCP version number is found by entering the SYSTEM/IDA command INTERPS. In the fol- 
lowing example, the version number is @12000101@. 


----> INTERPRETER 0 
NAME = MCPII/MICRO-MCP 
VERSION = @12000101@ 


Also included here are various local parameters to certain MMCP segments. 


For a system halt, if the MMCP was running, the first two digits in the L register are 02, and the 
next four digits specify what the MMCP was doing when it discovered the bad value and halted. 


For an interruptible system hang, if the interrupt button halted the processor, the MMCP did not have 
control. The MMCP responds to service request and timer interrupts only. 


For a non-interruptible system hang, the MMCP had control of the processor if the LR value written 
in the Fault Docket matches the M_MCP__LR field in HINTS. 


SYSTEM/IDA STATE Command 


Further information about the state of MMCP, specifically, the contents of the Interrupt queue and 
the MMCP work area, is displayed by the SYSTEM/IDA command STATE. 


VERSION AND STATE OF GISMO 


The GISMO version number is found by entering the SYSTEM/IDA command INTERPS and locating 
interpreter 1. In the following example, the version number is @12000101@. 


-~---> INTERPRETER 1 
NAME = GISM03/DEBUG 
VERSION = @12000101@ 


The GISMO state is displayed in the L-register. If the first two digits in the L register are @OD@, 
the next four digits specify what GISMO was doing when it discovered the bad value and halted. Fre- 
quently, the other registers provide additional information. 


GISMO State Flags 


Upon entry to GISMO, the contents of PERM register bits 1 and 3 are tested. Upon leaving GISMO, 
the bits are tested again. PERM(1) indicates a read or write outside the bounds of memory (D-S5 halt). 
PERM(3) indicates an uncorrectable CPU access error to S-Memory (D-54 halt). 


If the STATE.FLAGS field in the Y-register contains a non-zero value, the error was detected upon 
entry to GISMO, indicating the error occurred in the program that just called GISMO. The X-register 
contains the limit register of that program. 


If the STATE.FLAGS field contains zero, the error was detected upon leaving GISMO, indicating the 
error occurred while GISMO had control of the processor. 
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SYSTEM/IDA STATE Command 


Further information about the state of GISMO, specifically, the contents of the Interrupt queue and 
the GISMO work area, is displayed by the SYSTEM/IDA command STATE. 


STATE OF EACH JOB IN THE MIX 


The state of each job in the mix is found by entering the SYSTEM/IDA command JOB SUMMARY 
to obtain a job summary display. 


To find the value of a next instruction pointer of the job, enter: 


JOB <number> 
ESN 


and read the value in the NIP field. 
To find the contents of a communicate message field of the job, enter: 


JOB <number> 
ESN COMMUNICATE or ESN C 


To find more information about a job that is waiting for one or more events to become TRUE, enter 
the following: 


JOB <number> or J <number> 
and read the values for Next queue and Job status. 
To find the addresses and values of the events for which a job is waiting, enter the following: 


JOB <number > 
RSN EVENTLIST or RSN E 


The kinds of events upon which jobs in the mix typically wait include an interval of time and other 
conditions specified in a WAIT statement. 
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JOB QUEUE IDENTIFIERS 


Following are interpretations of the various Job queue identifiers: 


NOT QUEUED 
The job is running on either the master or slave processor, or its communicate message is being 
processed, or GISMO is running. On a dual processor system, if the RSN address of the job 
matches HINTS.DCPU__SLAVE__LAST__REIN, then the job is running on the slave processor, 
or its communicate message is being processed, or the slave GISMO is running. 


READY__Q 
The job is ready to resume execution on either the master or slave processor. 


EXTERMINATE__Q 
The job is ready for the SMCP program to discontinue the job on the master processor. 


S__COMM__Q 
The job is ready for the SMCP to begin or resume processing a communicate message on the mas- 
ter processor. 


M__COMM__Q 
The job is ready for the MMCP to resume processing a communicate message on the master pro- 
cessor. Processing could have been interrupted if a MMCP code segment was not present, or if 
a new disk area was needed for a read or write operation. 


IO0C__Q 
The job is ready for the MMCP to resume processing a communicate message on either the master 
or slave processor. Processing was interrupted to wait for the completion of some event, such as 
an I/O operation. 


WAIT__Q 
The job is waiting for one or more events in its event list. For better resolution on what the job 
is waiting for, see the Next queue, job status, and event list. When the event becomes TRUE, 
the job is moved to the queue specified by the Next queue field. 


The Next queue, job status, and event list are in a defined state only when the Job queue contains 


WAIT__Q. When the Job queue has any other value, these fields exist but are in an undefined state, 
and only the value in the Job queue defines the state of the job. 
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SECTION 6 
STATE OF THE INPUT/OUTPUT OPERATIONS 


The state of the input/output operations at the time a system memory dump is taken provides addition- 
al information about the state of the system. For every input/output operation there is an associated 
result descriptor (I/O descriptor) defining the status of the operation. Since GISMO handles all physical 
soft input and output on the master processor, analysis of the I/O descriptors will provide information 
about the state of the GISMO on the master processor. Hard input and output for MLCs can be initi- 
ated by either processor. Dual processor systems also use port to port communications to send messages 
to each other. This information is useful in analyzing system hangs or halts. 


The I/O descriptors may be divided into two groups: those that are associated with devices on multiple 
unit channels, such as disk and tape, and those that are associated with devices on single unit channels, 
such as card reader and printer. 


The I/O descriptors for devices on multiple unit channels are found by entering a DISK command to 
display the disk descriptor chain and by entering a TAPE command to display the tape descriptor 
chain. 


The I/O descriptors for devices on single unit channels are found as follows: 


1. Enter an IOAT command to display the Input-Output Assignment Table. This table contains 
an entry for every device physically connected to the processor through the I/O subsystem. 


2. Locate the entry for the device of interest. 


3. If a file has been opened on the unit assigned to that device, the unit is connected to a job 
in the mix. 


1) Locate the JOB NUMBER, and note the corresponding FIB ADDRESS. 
2) Enter a JOB <number> command followed by a FILE SUMMARY command. 


3) Locate the file number by finding the FIB ADDRESS in the ADDRESS column, and read 
the corresponding file number in the SG column. 


4) Enter FILE <number> to see the File Information Block for the file. 
5) The I/O Descriptors are found within the File Information Block. 


4. If a file has not been opened on the unit assigned to that device, the unit is not connected 
to a job in the mix. 


1) The I/O descriptors are found in the Unit Test Descriptor chain at the end of the IOAT. 


2) Note that these are the only I/O descriptors in the Unit Test Descriptor chain that are in 
a defined state at the time of the system memory dump. 


For further information, refer in this manual to appendix F, Input/Output Operations, and to I/O 
Subsystems in section 2, System Elements. Also see section 6, I/O Subsystems and Device Controls, 
in the B 1870/B 1860 Systems Reference Manual. 
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APPENDIX A 
SYSTEM/IDA EXAMPLES 


A sample analysis of a system memory dump using the SYSTEM/IDA program is presented in the 
following pages. A system memory dump operation was performed by entering a DM system command 
with the DBUG system option set. The execution of the SYSTEM/IDA program, the entry of various 
SYSTEM/IDA commands that display the state of the system at the time of the dump, and the corre- 
sponding output are shown and described. 


EXECUTING THE SYSTEM/IDA PROGRAM 


The following analysis of a system memory dump was performed at a remote terminal that was signed 
on to the SMCS program when the EXECUTE system command was entered. 


The SYSTEM/IDA program opened a remote file. While that file was open, messages that did not 
begin with the signal character were routed to the SYSTEM/IDA program. Messages beginning with 
the asterisk (*) signal character were routed to the SMCS program. 


After the remote file was opened, the program displayed the message ”--Ready for input (type HELP 
for help) --” and waited for a SYSTEM/IDA command. The command entered, OPTION LIST, caused 
the list to appear in a printer backup file. 


EX SYSTEM/IDA 
SYSTEM/IDA =1900 BOJ. PP=4&, MP=4 TIME =13:319:31.7 
REMOTE FILE OPENED BY "'SYSTEM/IDA', SIGNAL = * 
-- Ready for input (type HELP for help) --"’ 
OPTION LIST 
Options enabled: LIST ARRAYLIMIT = 64 


GETTING THE DUMPFILE 


The SYSTEM/IDA command GET SYSTEM/DUMPFILE causes the SYSTEM/IDA program to open 
the SYSTEM/DUMPFILE file for analysis and to display general system version information. This 
dump file resides on the DL DUMP system command's designation pack. Therefore, the ON keyword 
followed by a pack-id must be used when the SYSTEM/DUMPFILE file is not on the system pack. 
Refer to the B 1000 Systems System Software Operation Guide, Volume 1, for more information about 
the DL command. 


The information displayed includes the date and time the system memory dump operation was per- 


formed, the host name of the system, the version and compile date of the SMCP, and the contents 
of the L, T, X, and Y registers. The contents of the registers are decoded. 
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MCP STATUS 


In this example, the SMCP was running (NOT__QUEUED) because it was processing the DM system 
command. If a CLEAR/START system memory dump operation had been performed, the contents 
of the L, T, X, and Y registers would have appeared on this screen. 


Example: 


GET SYSTEM/DUMPF ILE 
System dumpfile title = SYSTEM/DUMPFILE 
11/05/84 a 137: 38. “6 :Date ot pdump 
AASSBP sHOSTNA 
MCP VERSION = MARK 12.0.00 10/30/84) 
PSEUDO MEMORY SIZE = 2097152 BYTES . 
MCPI! :MCP NAME 
MCPI1/MICRO-MCP :MICRO MCP NAME 
SDL2/iNTERP :INTERPRETER NAME 
GISMO03 :GISMO NAME 
SYSTEM/INIT. sINITIALIZER NAME 


xk MCP = MCPII xk% 

Job queue: NOT QUEUED 

Job eee ee Executing. 
MCP: Next S-op at P= 1,5= 0,D= 2896 = @00B50@ 
BEE seen ees List. ADDRESSES ARRAYLIMIT = 64 
or n e 


HELP COMMAND 


The HELP command displays the list of available commands or the syntax of a specific command. 
Example: 


eee 
] 
THELP! fol lowed by a command will show the syntax for that command. 
Commands are 
7BRK BYE DATA 7DP ENVIRONMENT ESN 
FILE FIB FPB GET IPC HELP LAYOUT MEMORY OPTION PPB PRINT 
RSN SMACHINE SPAD 
The following commands are not available in program dumps: 
BNA CHANNELS CODE CSV DCH DFH DISK DMS ERRORTABLE HINTS INTERPS | 
JOB LINKS MCP MPB NAMETABLE ODT PACKS PM PSR QUEUES STATE TAPE TR 
Lengthy output is written to a buffer that may be SCROLLed. 
Scroll commands are line numbers and: +- . $ 
The ?BRK command will terminate an endless loop. 
HELP SW or HELP SWITCHES will explain IDA's program switches. 
The manual gives the complete command semantics 
Current level = 12.0, patch 0, compiled on 11/09/84 04:30 PM 
-~END HELP. 
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ODT QUEUE 


The ODT command displays the most recent entries in the ODT queue. These are the entries at the 
end of the queue. All other SYSTEM/IDA commands display entries from the beginning of their corre-. 
sponding data structures, with the exception of the TRACE command. 


In the following example, the date field which normally appears on the left side of the output has 
been deleted to facilitate getting the example on the page. The last entry in the list shows the DM 
system command that caused this system memory dump. 


Example: 
ODT 
16:26:46.0 0 12/15/83. 
16:26:48.0 0 % fepts SYSTEM/ARCH =1795 PLEASE STOP IF INCORRECT 
16:26:54.5 0 * (ODT) SYSTEM/ARCH =1795 ENTER PACKS TO 
lenge oP 0 ARCHIVE WHEN ACCEPT APPEARS 
16:26:54.8 0 CANDE =1044 S/ (DAN) /QRSTREAM REPLACED 
16:27:01.0 0 (ODT) SYSTEM/ARCH =1795 ACCEPT. 
Were Oe | ODT 1795AX DB 
16:27:12.8 | ZIP REDB/ARCHI VE/F INDPACK 
Wee ee aed 0 DB/ARCHIVE/FINDPACK REMOVED 
16:27:18.5 O RMT Syoreeeon SYSTEM/IDA =1784 S/(SYSTEM/|DA) /DWH1 
16:27:21.9 O RMT (SYSTEM/IDA) SYSTEM/IDA =1784 EOJ. TIME= 16:27:21.7 
16:27:23.3 0 % (ODT) SYSTEM/ARCH =1795 ENTER SPECS:SPAN 
16:27:23.3 0 INCL SELECT TYPE EXCL 
16:27:23.5 0 % (ODT) SYSTEM/ARCH =1795 FOR DB PACK 
16:27:23.7 0 (ODT) SYSTEM/ARCH =1795 ACCEPT. 
16:27:31.1 0 RMT COBOL74 : *NOTITLEO =1793 EOJ. TIME = 16:27:31.0 
Wy Ge 1 ODT 1795AX 
16:2 fat sa 1 ODT 1795AX S$ 
16:28:18.7 | ODT 1795AX SELECT CARDS 
16:28:24.1 | ODT 1795AX 
Uc ra ee 1 ODT 1795AX 
16:28:44.7 | ZIP QU SMCS/MCPQ LS SZ 9 RR 1 US SYSTEM/IDA DM 
-- End ODT QUEUE; 861 lines -- 
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MCP ANALYSIS 


The next two examples show the SMCP activity between the time the DM system command was entered 
and the time the contents of memory were written to the SYSTEM/DUMPFILE file. The first example 
shows the flow of control, and the second example shows an important data structure for dumping 
system memory. 


MCP Layout Summary 


The MCP layout summary shows the history of MCP procedure calls. In the example that follows, 
the global procedure called procedure GET__SET____GO, which is where the MCP waits for some- 
thing to do. GISMO activated the MCP to check a communicate message because a system command 
was zipped. The control card driver was called to decode the command and discovered the command 
began with the letter D. The command turned out to be a command to dump the system state. A proce- 
dure was then called to build the disk I/O descriptor (MDD) of the MCP and wait either for 30 sec- 
onds to elapse or for the operation to complete. The last procedure dispatched the MCP disk descriptor 
to GISMO. 


Example: 


LAYOUT SUMMARY 


Frame Kind Name Next op at: 

O Global = 0,S= 0,D= 212 
1 Proc GET _SET GO = 1,5= 0,D= 116232 
2 Proc CHECK_COMMUNICATE_MESSAGE P= 1,S= 0,D= 103344 
3 Proc ZIPP P= 4,S5=11,D= 512 
4k Proc CTRL_CARD_DRIVER P=31,S= 8,D= 18012 
5 Proc D P=31,S= 2,D= 19024 
6 Proc DUMP_SYSTEM_STATE P=11,S= 3,D= [852 
f Proc BIOAW P= 1,S= 0,D= 24896 

Proc INITIATE 10 P= 1,S= 0,D= 2896 


-- End LAYOUT SUMMARY ~- 
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MCP Layout Frame and Variable 


The LAYOUT 0 VAR MDD command displays the disk descriptor (MDD) of the MCP. This descriptor 
is in frame 0, the global procedure. 


In the example that follows, descriptor bit 1 is OFF and descriptor bit 2 is ON, indicating the descrip- 
tor was initiated by GISMO to the disk control and that the operation is in process. When the COM- 
PLETE bit is OFF, the meaning of the following bit changes from EXCEPTION to INITIATED. The 
OP__CODE and UNIT fields specify a write operation to unit 0. The BEGIN and END__ADDR fields 
specify that the write operation is to take data from memory address 0 through memory address 
@FFFFFF@. The DISK__ADDRESS field specifies that the data is to be written to disk sector 
@047383@. The PORT and CHANNEL fields specify the descriptor is for port 7 channel 9. 


Example: 


LAYOUT O VAR MDD 

Frame 0; Next S-op at P= 0,S= 0,D= 212 = @000DkLE 

-~ Layout of variable MDD 

Global frame 

Locals: 

MDD.ACTUAL END [FD81E4] = @FD7FAO0@ (16613280) 

RESULT [FD81FC] = @520£09@ (5377545) 
BIT 1 2 [FD81FC] = 
COMPLETE [FD81FC] = ae 
EXCEPTION [FD81FD] = TRUE 
INT BITS [F0820B] = 0 
INTERRUPT [FD820B] = FALSE 
H! INT [FD 20C] = FALSE 
LINK [FD8214] = @FDBFFF@ (16629759) 
OP [FD822C] = @4000008 (4194304) 
OP CODE epee 
UNTT [FD8240] = 
BEGIN [FD8244] = 0 
END ADDR [FD825C FFFFFF@ (16777215) 
DISK ADDRESS [ED 274 = @047383@ (291715) 
M_EVENTS [FD82 
M_EVENTS_10C 2 28C] = FALSE 
M_EVENTS S10C [FD828D] = FALSE 
M_EVENTS_INT_M [FD828F] = FALSE 
M_EVENTS S_INT_SENT Er bB2911 = TRUE 
M_EVENTS_M_INT_ SENT FD8291}] = FALSE 
M EVENTS INT S [FD8293] = FALSE 
MCP_10 [FO823 4] = @O000A@ (10) 
FIB_ADDR fED et = 0 
FIB_LINK [FD82BC] = @FD80E5@ (166 136 05) 
BACK_LINK feo g2pa) = @FDAIIF@ (16621855) 
PORT CHAN [FD82EC] = @79@ (121) 
PORT [FD82EC] = 7 
CHANNEL [FD82EF] = : 
BEEN THRU_ERROR [FD82F3] = FALSE 

-- End LAYOUT Frame 0; 35 lines -- 
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DISK DESCRIPTOR CHAIN 


The DISK command displays the disk descriptor chain and shows the disk descriptor of the MCP, 
which is always in the second entry immediately following the system pause descriptor in the first entry. 
These descriptors are also found in a layout of MCP frame zero, with the variable names MDD and 
SPD. 


The disk descriptor of the MCP shows the same information that was displayed by the LAYOUT 0 
VAR MDD command. It describes a write operation to port 7, channel 9, unit 0, disk sector 
@047383@, beginning at memory address 0 and ending at memory address @FFFFFF@. 


Example: 
DISK 
*kk DISK DESCRIPTOR CHAIN *** 
RESULT 10 
DESCR ACTUAL RESULT MCP 
ADDR END DESCR LINK 10 OP BEGIN’ END DISK 10 FIB 
FDAI1F 000000 FD8I1IFC 840000 
FD81FC FD7FAO 520E09 FDBFFF 400000 000000 FFFFFF 047383 10 
.. M_EVENTS = @086 F PORT = 7, CHANNEL = 9 
FDBFFF FC80EA 800080 FDBCAC LOOOOO FC7FFE FC80EA O4114E 18 FD2581 
-» M EVENTS = @CO@ . PORT = 7, CHANNEL = 9 
FD8C4C 120FO09 FD2E10. 900005 11 
M EVENTS = @086 .«» PORT = 7, CHANNEL = 9 
FD2E10 26C4FB  oED O FBEA57 000000 268263 26C4FB 037803 5 FD2581 
~. M_EVENTS = oe .-+ PORT = 7, CHANNEL = 9 
FBEAS7 6BB79D 8600 O F32DBF 000000 6BB64D 6BB79D OOOOF3 24 FBE88E 
-. M EVENTS = a ‘ PORT = 7, CHANNEL = 9 
oe F33087 aoe 6) F93290 "400000 F32EB7 F33457 03DD50 F 3298F 


M_EV SOE . PORT = 7, CHANNEL = 9 
F93290 “TO2KO 8600 O F8ELB8F OSCR 7DOECC upenee O1AF43 5 F92A01 


NTS = @CO : EL. a9 
FeEMBF FBEB27 BS0080 FB9622 "400000 “rbés67 8 F8EB27 001B23 F8EO5F 
-» M_EVENTS = 1945 . PORT = 7, CHANNEL = 9 
FB9622 6BB7DD 800080 FDA1IF 000000 6BB64D 6BB7DD 0255D8 24 FB94L59 
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COLD START VARIABLES 


The CSV command displays the first page of the cold start variables. The following example illustrates 
the cold start variables for a specific system. 


Example: 
CSV 
xkk COLD START VARIABLES *%*x 
0 :CS_INTERP 
O :CS_MCP 
O :CS_GISMO 
O :CS_INIT 
O :CS_MICRO_MCP 
O :CS_ CONTROLLER 
O :CS_MCS 
O :CS ODT 
@F2000008A@ :NAME TABLE 
: INTERP_DIC_ENTRIES 
225 :CS SIZE 
@F 20047 3858 :DUMP FILE 
@FOOOO0@: 15728640 :cSv TOLD START_LEVEL 
TRUE :L61_NAME_ TABLE 
TRUE :L10_0 NEW SYS DISK_TABLES 
TRUE :L10_O0_NAME TABLE 
TRUE :L11 0 NAME TABLE 
O :GISMO TRACE FLAGS 
18650 <:DUMP FILE STZE 
O :CORRECTABLE_ERROR_TABLE_LEN 
@000000000@ :MPF_TABLE 
@F2000FABA@ :LOG_MI X_INFO 


TERMINATING THE SYSTEM/IDA PROGRAM 


Execution of the SYSTEM/IDA program is terminated by entering the BYE command. 


BYE 
—END OF SESSION — 
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APPENDIX B 
HARDWARE ORGANIZATION 


An understanding of the paths available for data flow to and from I/O devices, the processors, and 
memory can greatly facilitate the analysis of system memory dumps. 


Figure B-1 shows a B 1955 single processor system. The processor is connected to memory through 
port 0, the host adapter, and the memory base unit, and is connected to the I/O devices through port 
7, the I/O subsystem, and I/O controls. Single-unit channels require I/O controls only; multiple-unit 
channels include electronics controllers. A single-line control may be attached on channel 13 of the I/O 
subsystem. 


Figure B-2 shows a B 1985 dual (master and slave) processor system. As in figure B-1, the master pro- 
cessor is connected to memory through port 0 and to the I/O devices through port 7, the I/O subsys- 
tem, and I/O controls for single unit channels and electronics controllers for multiple unit channels. 
Note that both NRZ and PE magnetic tape units can be attached to the I/O subsystem on channels 
11 and 12. 


The slave processor connects to memory through port 1, a host adapter, and the memory base unit. 
Port 2, from the host adapter, connects the slave processor to a multiline control that services up to 
15 datacomm adapters and the associated terminals. 


Figure B-3 shows a B 1990 single processor system. The ODT is connected directly to the processor, 
and there is no host adapter. The disk subsystem controller on channel 9 includes a printer control 
that services one line printer through channel 8 and up to 8 disk pack units. The magnetic tape control 
needs no electronics controller; it accepts one tape unit. The multiline control is required and may be 
connected on either port 1 or port 3. 


Figure B-4 shows a B 1990 dual processor system. The slave processor is connected through port 2 to 
the memory base unit and memory. The disk subsystem controller on channel 9 includes a printer con- 
trol that services one line printer through channel 8 and up to 8 disk pack units. The magnetic tape 
control has a master electronics controller with the provision for up to 8 tape units. 
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Figure B-1. B 1955 Single Processor System 
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Figure B-2. B 1985 Dual Processor System 
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Figure B-3. B 1990 Single Processor System 
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Figure B-4. B 1990 Dual Processor System 
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APPENDIX C 
PROCESSOR ALLOCATION 


GISMO controls all processor allocation. It has only one entry point. The address of the entry point 
is in the HINTS.MASTER__GISMO field. The instruction at the entry point transfers control to the 
ENTER.GISMO module. 


The ENTER.GISMO module first tests for an out-of-bounds memory access or a memory parity error. 
If neither condition exists, control is transferred, based on a value passed in the X-register, to one 
of the procedures listed next and described in the paragraphs that follow. 


HANDLE .COMMUNI CATE 
HALT.AND.EXPLAIN 
DISPATCH.THRU.CHANNEL.TABLE.AND.CLEAR.EXCEPTION.IDLE 
DISPATCH. THRU.CHANNEL. TABLE 
MCP.FETCH. INTERRUPT 

HANDLE. INTERRUPT 
MMCP..RETURNING.CPU 
MCP.SAVE.IN.1Q 

ENABLE .DISABLE.INTERRUPTS 
START .SCHEDULER 
INTERP.OR.MCP.TRACE ; 
COMMUNICATE .WITH.GISMO 
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HANDLE.COMMUNICATE 


A communicate message has been sent from a job. The format of the communicate message is con- 
tained in the programmatic description of the environment structure nucleus. 


The following is a programmatic description of the communicate routing process. The process is based 
on the contents of the type bits in the communicate message. 


Stop accumulating processor time for the job. 
If the type indicates a program internal interrupt then 
If the interrupt number is 60 then 
A job is giving up control. 
Mark the job in the Ready queue. 
Run the scheduler. 
If the interrupt number is greater than 55 then 
Mark the job in the SMCP communicate queue. 
Run the scheduler. 
If the interrupt number is 18, 53, or 55 then 
One of the following errors is being reported: 
A write beyond the job's base limit area. 
A cassette data error. 
A read or write out of physical memory. 
If the reporting job is not the SMCP then 
Mark the job in the SMCP communicate queue. 
Run the scheduler. 
Else (the reporting job is the SMCP) 
Move one of the following values to the L-register: 
@0D0012@ 
@0D0053@ 
@0D0055@ 


Halt the processor. 


When the type does not indicate a program internal interrupt, the run structure for the job is examined 
before the communicate verb is used to index into the communicate splitter mask. 


If the job is currently active in a use routine then 
Run the MMCP to interpret a pocket select communicate. 
If the type does not indicate a standard communicate then 
Mark the job in the SMCP communicate queue and then run 
the scheduler. 
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The type indicates a standard communicate. If the verb is @800@ or greater, the communicate is a 
GISMO communicate. Following is a description of the GISMO communicate in programmatic terms. 


If the job does not have the ESN control] state bit set then 
Discontinue the execution of the job. 

If the verb is @801@ then 
Place the job in the Wait queue. 

If the verb is @803@ then 
Perform a Adjust MCP Interpreter operation. 
(Obsolete. Used on B1720 systems to transfer control to the 
re Had eee after adjusting control memory management 

ields. 

lf the verb is @804@ then 
Perform a Find Window operation. 
(Used to select an area of memory to satisfy a request for 
S-memor y) 


Else 
Move @0D0039@ to the L-register. 


If the verb is 47, perform a complex wait operation. Build a list of absolute memory addresses, each 
pointing to a Boolean. If any of the Booleans is TRUE or becomes TRUE, the job is put into the 
queue specified by the next Q. If all the Booleans are FALSE, put the job into the WAIT.Q. 


If the verb is 40, do a DC INITIATE.IO. 
If the verb is 13, perform one of the following operations: 


Data Overlay for SDL or SDL2 
DMS Read 

DMS Lookahead Read 

DMS Write 

DMS Audit Write 

Direct I/O 


Use the verb to index into the communicate splitter mask. The mask is a series of 8-bit fields specifying 
where the communicate operation is to be routed. Based on the value returned, one of the following 
actions takes place. 


Value = 4 
Mark the job in the SMCP communicate queue. 
Set the SMCP Communicate Queue Event bit. 
If the SMCP was in the Wait Queue then 
Mark the SMCP in the Ready Queue. 
Run the scheduler. 


Value = 5 
If there is a service request then 
Handle the service request. 
Run the MMCP. 


Value = 2 
Switch between the primary and DMS environments. 


Value = 3 
Switch between the primary and IBASIC environments. 


1152055 C-3 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
Processor Allocation 


HALT.AND.EXPLAIN 


An invalid entry parameter was passed in the X-register. The system halts with L = @0OD0042@, and 
the T-register contains the limit register of the program that passed the invalid parameter. 


DISPATCH. THRU.CHANNEL. TABLE.AND.CLEAR.EXCEPTION.IDLE 


Clear the EXCEPTION.IDLE bit in the channel table then perform DISPATCH.THRU.CHANNEL- 
-TABLE. 


DISPATCH. THRU.CHANNEL. TABLE 


An I/O descriptor has been dispatched. If the I/O channel is not busy, and not idle because of an 
exception, the descriptor is sent to the I/O control. 


NOTE 
Only channels that cannot continue after an exception, such as the card read- 
er or the printer, will have the exception idle bit set. If the channel is busy, 
the descriptor is sent later. 


MCP.FETCH.INTERRUPT 


The address of an I/O result descriptor is returned to the MCP. 


HANDLE.INTERRUPT 


Interpreters typically consist of a loop that (1) fetches, (2) decodes, and (3) executes an instruction. 
A test is made at the beginning of the loop for any interrupt condition. The processor hardware assists 
here by ORing all interrupt conditions into a single bit, called ANY.INTERRUPT, which can be tested 
in a single microinstruction. When such a condition exists, control is transferred to the HANDLE.I- 
NTERRUPT procedure. The following is a programmatic description of the procedure. 


If a memory read data error or a write beyond the limit register error occurred then the following 
action is taken: 


Read and clear the error log register. 
If an uncorrectable memory error occurred then 
Move @0D0054@ to the L-register. 
Halt the processor. 
If a single bit error occurred then 
Make an entry in the Correctable Error Table. 
Make an entry in the Interrupt queue. 
Set the SMCP interrupt queue event. 
If the SMCP was in the Wait queue then 
Mark the SMCP in the Ready queue if the SMCP was waiting 
on that event. 
If a cassette data error occurred then 
Return with 53 in the L-register. 
lf a read or write beyond the MAXS register occurred then 
Return with 55 in the L-register. 
If a write beyond the limit register occurred then 
Return with 18 in the L-register. 
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The following describes in programmatic terms the beginning of the HANDLE.INT.LOOP procedure. 


If the console halt bit is set then 
Wait for I|/0s to complete 
Move @0D0010@ to the L-register. 
Halt the processor. 
Reset the service request bit. 
If the port interrupt bit is set then 
Handle one of the following port interrupt conditions: 
A message from the master processor to the slave 
processor to do one of the following: 
Purge the slave processor cache memory. 
Block the scheduler from running a specific job 
or from running any jobs on the slave processor. 
Unblock the scheduler from running a specific job 
or from running any jobs on the slave processor. 
Set the slave processor console interrupt flag. 
A message from the slave processor to the master 
processor to perform a DISPATCH.THRU.CHANNEL.TABLE 
operation. 
A message from the multiline control that an 1/0 
operation completed. 
Transfer control to the beginning of the HANDLE.INT.LOOP 
procedure. 
if the service request bit is set then 
An 1/0 control] is requesting service by the master processor 
for one of the following reasons: 
To transfer data. 
Because an |/0 operation completed. 
Because a seek operation completed. 
Transfer control to the beginning of the HANDLE.INT.LOOP 
procedure. 
If the timer interrupt bit is set (occurs every tenth of a second) 
then do the following: 
Test for dual processor timeout. 
Leave message for scheduler that timer interrupt occurred. 
Move the time register to HINTS.TIME_MARK. 
Add 1 to HINTS.SYCOUNTER. 
If the memory management sampling interval has elapsed, 
perform the thrashing detection logic to conditionally 
set the HINTS.MEM_SWEEP_PENDING bit. 
Transfer control to the beginning of the HANDLE.INT.LOOP 
procedure. 
End of the HANDLE.INT.LOOP procedure. 


If no Force Reschedule bit set or interrupts are disabled then 
Allow the interrupted job to resume processing by returning 
with O in the L-register 

Else 
Require the interrupted job to save state and give up control 
to the scheduler by returning with 60 in the L-register. 
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MMCP.RETURNING.CPU 
The MMCP is returning control of the processor for one of the following reasons: 


1. The MMCP completed tanking (saving reader/sorter data in a buffer), and has set up a job 
for running the use.routine. In this case, reinstate the job to run the use routine. 


2. The MMCP completed a communicate operation for a job. If no Force Reschedule has oc- 
curred then reinstate the job, otherwise, mark the job in the Ready queue and run the sched- 
uler. 


3. The MMCP needs help from the SMCP before it can complete a communicate operation for 
a job; for example when a logical write operation is in process and a new disk area is required. 
In such cases, mark the job in the queue specified by the MMCP. Run the scheduler. 


4. The MMCP has built a wait list of events. In this case, if any of the events were TRUE, then 
put the job in the queue specified by the next queue ID; otherwise, put the job in the 
WAIT__Q. Run the scheduler. 


MCP.SAVE.IN.IO. 


This entry point is not used. 


ENABLE.DISABLE.INTERRUPTS 


The DISABLE_INTERRUPTS field in the run structure of the currently running job is decremented 
or incremented. Interrupts are enabled if the new value is zero; otherwise they are disabled. If inter- 
rupts become enabled, the service request bit is set. 


START.SCHEDULER 


This is the initial entry point from SYSTEM/INIT at CLEAR/START. If DMS is not permitted to 
run on the slave processor, a bit in HINTS is set to remember this. This procedure then transfers con- 
trol to the scheduler procedure. Since a CLEAR/START has just been performed, the scheduler will 
find the SMCP ready to run. 


SCHEDULER 


The scheduler is the procedure that allocates the processor to the SMCP, the MMCP, and the jobs 
in the mix. The following is a programmatic description of the scheduler. 


lf any interrupts are outstanding then 
Call the HANDLE.INT.LOOP procedure to handle all outstanding 
interrupts. 


If running on the master processor then 
if a timer interrupt has occurred then 
Run the memory link sweeper if the MPRI system option 
is set and the HINTS.MEM_SWEEP_PENDING bit is set. 
Run the timer dispatch procedure (every 16th timer 
interrupt) to initiate test and wait operations 
on idle disk and tape controls to see if any 
disks or tapes have been mounted or dismounted. 
Move the SMCP and any job in the mix whose wait time has 
expired to the queue specified in its RS_NEXT_Q field. 
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If the MMCP high priority interrupt queue event is TRUE (used for 
reader/sorter operations) then 
Run the MMCP. 
If the SMCP is in the Ready queue and the SMCP interrupt queue 
event is TRUE then 
Run the SMCP. 
lf the SMCP is in the Ready queue then 
lf the scheduler is blocked then 
Run the SMCP. 
If it is time for the SMCP to do its housekeeping then 
Run the SMCP. 
Set a flag to note that the SMCP was in the Ready queue. 
Else 
If the scheduler is blocked then 
Idle and wait for a any interrupt. 


Select the highest priority job in the mix which is in the 
Ready queue, MMCP communicate queue, SMCP communicate queue 

(if the SMCP was in the Ready queue), or the |/0 complete queue. 
If more than one job of the same priority group is available, 
select the job which follows the last job run at that priority. 


(The last job run within a priority group has the RS_LAST_TOP 
bit set.) 


If no job is selected then 
If the SMCP was not in the Ready queue then 
Idle and wait for any interrupt. 
Run the SMCP. 
If the job selected was in the SMCP communicate queue then 
Run the SMCP. 
If the SMCP was in the Ready queue and its CPU priority is 
greater than or equal to that of the selected job then 
Run the SMCP. 


If no job is selected then 
Mark the job as Not queued. . 
If the job had been in the MMCP communicate queue or the |/0 
complete queue then 
Run the MMCP. 
Reset the previous RS_LAST_TOP bit; set the current 
RS_LAST_TOP bit. 
Retnstate the selected job. 


Else (running on the slave processor) 
If the scheduler is not blocked from running on the 
slave processor then 
Select the highest priority job in the mix which is in the 
Ready queue or the IOC queue and is not blocked. 
If more than one job of the same priority group is available, 
select the job which follows the last job run at that priority. 
lf a job is selected then 
Mark the job as Not queued. ; 
Save the address of its run structure in 
DCPU.SLAVE.LAST.REIN. 
If the job was in the !0C queue then 
Run the MMCP. 
Reset the previous RS LAST_TOP bit and 
set the current RS_LAST_TOP bit. 
Reinstate the selected job. 
Else 
Go idle and wait for a timer interrupt. 
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INTERP.OR.MCP.TRACE 


This procedure is called to make an entry into the GISMO trace table. 


COMMUNICATE.WITH.GISMO 


The various GISMO functions that are performed at this entry point are listed in the following 
paragraphs. 


Schedule Operations 

Included in the GISMO functions are the following operations that affect the scheduler. 
INTERRUPT.SLAVE 

Dispatches a port interrupt to the slave processor to set the slave processor console interrupt flag. 


Q.OUT.TOP 


Locates the highest priority program in a specified queue. For example, when the SMCP communicate 
event is TRUE, the SMCP performs a COMMUNICATE. WITH.GISMO operation to locate the high- 
est priority program in the SMCP communicate queue. 


MARK.IN.Q 


Moves a job to a specified queue. For example, when one of the events of a job in the Wait queue 
occurs, a MARK.IN.Q operation is performed to move the job to the queue specified in the 
RS__NEXT__Q field. 


HANG.PROGRAM 


Places the SMCP or a job in the mix in the Wait queue. For example, the SMCP can hang on TIME 
or I/O COMPLETE. The SCMP and jobs in the mix can hang on a list of events specified in a WAIT 
statement. 


CAUSE.PROGRAM 


An event has occurred; this operations locates and wakes up all programs waiting on the event. Using 
the address of the event, CAUSE.PROGRAM looks at the SMCP and all jobs in the mix. For each 
program waiting on the event, it reports the event and checks intervention as follows. 


If the RS_REPORT__EV__INX bit is TRUE, the result of the event in the 
ES__REINSTATE__MSG__PTR is reported. If the RS_INTERVENTION bit is TRUE, a master pro- 
cessor rescheduling operation is forced and the program is moved to the SMCP communicate queue; 
otherwise, a master and slave processor rescheduling operation is forced and the program is moved 
to the queue specified in the RS_NEXT_Q field 


BLOCK.SLAVE 


Dispatches a port interrupt to the slave processor to block the scheduler from running a specific job 
or from running any jobs on the slave processor. 
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UNBLOCK.SLAVE 


Dispatches a port interrupt to the slave processor to unblock the scheduler from running a specific 
job or from running any jobs on the slave processor. 


REHANG.PROGRAM 
Checks the event list for a program to see if any events on which it was waiting have occurred. If 


an event has occurred, it is reported and intervention is checked, as specified above in the description 
of CAUSE.PROGRAM. 


PURGE.CACHE.MEMORY 
Dispatches a port interrupt to the slave processor to purge the slave cache memory. 


This is requested by the SMCP when microcode has been overlaid to prevent the slave from executing 
code that is no longer present in S-memory. 


UPDATE.LAMPS 


Updates the information in the 24 main exchange lights on the system console for system performance 
monitoring. 


MEMORY.MANAGEMENT.FUNCTIONS 

If the MPRI and THR system options are set, the HINTS.OVERLAY.COUNTER is bumped. 
MAKE.TRACE.ENTRY 

Makes an entry into the GISMO trace table. 

REWIND.CASSETTE 


Rewinds the console cassette tape drive. 
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APPENDIX D 
MEMORY ORGANIZATION 


The major data structures used by the SMCP program to keep track of its own state and the state 
of the user tasks in the mix are delineated in this appendix. These structures include the cold start 
variables, the SMCP global variables (HINTS), the run structure nucleus (RSN), and the environment 
structure nucleus (ESN). 


SOFTWARE CONFIGURATION 


Figure D-1 shows how the SMCP locates the run structures and environment structures for the various 
tasks in the mix. The HINTS.FIRST__QUEUE field points to the run structure nucleus (RSN) for the 
first task in the mix. 


The RSN RS__Q__LINK field points to the RSN of the next task. The RSN RS__ENV__DIC field 
points to the environment dictionary. The RSN RS__FIB__DIC field points to the FIB dictionary. 


The environment dictionary points to the primary and secondary environment for the task and also 
contains processor times for each environment. The primary environment points to the code and data 
for the task. The secondary environment points to code and data of a process that performs system 
functions on behalf. of the task. 


Following are the environment numbers and the use to which each is put. 


Environment 0 
The primary environment for the SMCP program and all tasks. 


Environment 1 
Not used. Reserved for future development. 


Environment 2 
A secondary environment for DMSII programs. 


Environment 3 
A secondary environment for IBASIC programs. 


A page dictionary exists only for programs that page their code segments. A data dictionary exists only 
for programs that have paged data. BASIC, COBOL68 and FORTRAN are programs of this type. SDL 
and SDL2 programs with paged arrays use page tables within the program’s dynamic memory. These 
tables are managed by intrinsics that use the data overlay communicate (type 13). 
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HINTS RSN 


RS_Q_LINK Next Task’s RSN 


FIRST QUEUE FIB DICTIONARY 


RS_FIB_DIC 


—> FIBS 


ENTRIES 


ENVIRONMENT DICTIONARY 


ENTRIES z 
| | CODE SEGMENT DICTIONARY 


PRIMARY ENVIRONMENT DMS OR IBASIC oon 
STRUCTURE NUCLEUS ENVIRONMENT 
(IF PRESENT) 


RS_ENV_DICT_ADDR 


SY_ADDRESS 


= 


PAGE DICTIONARY 


ES_RSN_ADDRESS 


ES_SEG_DIC_PTR 


ENTRIES 
DATA DICTIONARY 


ENTRIES 


ES_DATA_DIC_PTR 


SEGMENT DICTIONARY 


| ENTRIES | 


ES_LOCAL_DATA_ADDR_ 


LOCAL DATA AREA 


DATA SEGMENT 


CODE CODE 
SEGMENTS SEGMENTS 
DATA SEGMENT MEMORY 


BR 


Figure D-1. Software Configuration 
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COLD START VARIABLES 


The cold start variables include information on the date, time, and the system options. A programmatic 
description follows. 


RECORD 1 PRO_ARRAY 
2 PCU . 


2 LABEL_TYPE 
* 0 = ANSII 
% 1 = UNLABELED 
% 2 = BURROUGHS 
2 TRANSLATE BOOLEAN,% O=EBCDIC 
2 CLEAR_START BOOLEAN; 
CONSTANT MAX_SYSTEM_DISKS = 16; 
TYPE SYS_DISK_INDEX_TYPE BIT(4); % for indexes into CSV.SUS (SDI) 
RECORD 1 SYSTEM_UNITS_ARRAY BIT (16), 
2 SYS_PCU PCU_LAYOUT, 
2 AVL_DISP BIT (4) ; 
%%%%%% CONSTANT CSV_SIZE; See the CONSTANT below the CSV record 


RECORD COLD_START_VARIABLES 
CLEAR_START_FLAGS 


T=ASCI I 


RECORD 


% Add value in the field to the corresponding index.’ For 
% example, index into name table for the current network 
% controller is CONTROLLER_INDEX + CSV.CS_ CONTROLLER. 

% See CM_GRINDER (mod 27). 


FILLER Tee 

CS_INTERP BIT (4), 

* Which interpreter. O=>1, 1=>IX. 

CS MCP BIT (4), 

% Which MCP. O=>M, 1=>MX. 

CS GISMO BIT (4), 

% Which Gismo. O=>G, 1=>GX. 

CS INIT BIT (4), 

% Which Initialiser. O=>N, 1=>NX. 

FILLER BIT (4), 

CS_MICRO_MCP BIT (4), 
Which micro mcp. O=>MM, 1=>MMX. 

CS CONTROLLER BOOLEAN, 

STRUE=>CX, FALSE=>C is active. 

CS MCS BOOLEAN, 

*TRUE=>MCX, FALSE=>MCS is active. 

CS ODT BOOLEAN, 

*TRUE=>0DX, FALSE=>0DT is active. 

at dete BIT (5) 
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NAME_TABLE BIT (36), 


* Disk address of the name table. 


INTERP_DIC_ENTRIES BIT (24), 

CS SIZE Bane 

DUMP FILE BIT (36), 

CSV COLD START LEVEL RECORD 
T61_NAME_TABLE BOOLEAN, 
L10_0_NEW SYS DISK_TABLES BOOLEAN, 
L10_O NAME_TABLE BOOLEAN, 
L11~O~NAME_TABLE BOOLEAN, 
FILTER BIT (20) 

END, 

GISMO TRACE FLAGS RECORD 
[CHANNELS T (15) 

1 CHANNEL (5) BOOLEAN], 
GISMO OOLEAN, 

PORT SDDLEAN: % 16. 
USER BOOLEAN, % ie 
MMCP BOOLEAN,% 18. 
SMCP BOOLEAN,% 19. 
GISMO_ FREQUENT BOOLEAN,% 20. 
TIMESTAMP BOOLEAN,% 21. 


DATA_TRANSFER BOOLEAN, - 22. 
TABLE LOCKED BOOLEAN % 23. 
This is used by the Gismo trace mechanism so that a dual 
% processor system is correctly traced. 


ND, 
DUMP FILE SIZE 1T (16), 
CORRECTABLE_ERROR_TABLE_LENGTH BIT ey »& 4O + 32%#ENTRIES 
MPF_TABLE BiT (36), 
LOG MIX_INFO Bitte : 
DISK_AVAIL BIT (36), 
DISK DIRECTORY BIT (36), 
TEMP TABLE BIT (36), 
SY_DATE RECORD % FOR SYSTEM/ODT RECORDS 
“SY DAY BIT (5), 
SY MONTH BIT (kh), 
SY YEAR BIT (7 
END, 
SY JDAY BIT (9), 
SY_TIME RECORD 
SY_HOUR BIT (5), 
SY_MIN BIT (6), 
SY_SEC ae ; 
SY_1OTHSEC BIT (4 
D, 
SY_12HOUR BIT (5), 
SY_DAYNAME ST TER 
SY_MERIDIAN CHARACTER (2) , 
SYSTEM_OPTIONS RECORD 
LOG OPTION BOOLEAN, 
CHARGE OPTION BOOLEAN, 
LIB OPTION BOOLEAN, 
OPEN_OPTION BOOLEAN, 
TERM OPTION BOOLEAN, 
TIME_OPTION BOOLEAN, 
DATE OPTION BOOLEAN, 
CLOSE OPTION BOOLEAN, 
PBT_OPTION BOOLEAN, 
PBD_OPTION BOOLEAN, 
BOJ_ OPTION BOOLEAN, 
EOJ OPTION BOOLEAN, 
SCHM OPTION BOOLEAN, 
LAB_OPTION BOOLEAN, 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
Memory Organization 


RMOV_OPTION BOOLEAN, 
DUMP_OPTION BOOLEAN, 
ZIPP_OPTION BOOLEAN, 
MEM_OPTION BOOLEAN, 
SWO1_OPTION BOOLEAN, 
SWO2_OPTION BOOLEAN, 
SWO3_ OPTION BOOLEAN, 
LTB_OPTION BOOLEAN, 
AMCS_OPTION BOOLEAN, 
FILLER BOOLEAN, 
TRMD_OPTION BOOLEAN, 
DEBUG_OPTION BOOLEAN, 
DISP_OPTION BOOLEAN, 
ODTL_OPTION BOOLEAN, 
RMSG_OPTION BOOLEAN, 
SQRM_OPTION BOOLEAN, 
COPY_OPTION BOOLEAN, 
BREL_OPTION BOOLEAN, 
MPRI_ OPTION BOOLEAN, 
THRASHING OPTION BOOLEAN, 
FLMP_OPTION BOOLEAN, 
VLCP_OPTION BOOLEAN, 
VL10_OPTION BOOLEAN, 
FILLER BOOLEAN, 
WFL_OPTION BOOLEAN, 
SWD_option BOOLEAN, 
SWE_option BOOLEAN, 
SWF_option BOOLEAN, 
FILLER BIT (38) 
END, 
FIRST SCHED ENTRY te 
FIRST_WAITING_ SCHED Ete ; 
MIX_LTMIT BIT (8) , 
SYSTEM_UNITS RECORD 
SUS” (MAX_SYSTEM_DISKS) SYSTEM_UNITS_ARRAY 
END, 
MASTER_1|OAT DSK_ADR, 
MASTER _DISK_AVAIL DSK_ADR, 
NEXT_LOG_REC DSK_ADR, 
LG _STZE WORD, 
NEXT_ELOG DSK_ADR, 
ELOG SIZE WORD, 
JOB_No WORD, 
PBD_ NO WORD, 
ODT Q SIZE WORD, 
CTLDCK_NO WORD, 
LOG_NO WORD, 
DTSK DSK_ADR, 
TRACE_FPB DSK_ADR, 
AUTO_MASK_ARRAY so L OF 7 EACH=PRT PC 


jAUTO_NASK (k) 
AB NUMBER 


BIT (3)-,% NUM OF SYSTEM/BACKUPS 


PBD BLCKS AREA WORD, 
LG LAST AREA BOOLEAN, 
ELOG_LAST_AREA BOOLEAN, 
d|l_backup_designation NAME, 
DSK ADR, 
PROTECTED UNITS RECORD 
PRO_ELEMENT (16) PRO_ARRAY 


END, 


1152055 


CONSTANT 


B 1000 Systems Memory Dump Analysis 


Functional Description Manual 
Memory Organization 


SYS_LOG NUMBER BIT (24), 

JOB_ACCTING NUMBER BIT (24) , 

SESSION NR BIT (16) 

FILLER BIT (36) , WAS THE XM TABLE 
CSV_NSEC_DISABL THRASH FAULT — BOOLEAN, 
CSV_OVERLAY_RATE BIT (6), 
CSV_THRASHING SENSITIVITY BIT (8) , 

CSV_HOSTNAME CHARACTER (17) .% BNA. 
NEXT HOSTNAME CHARACTER (17) , 
SYSTEM PROGRAM PACK NAME, 

ERROR RATE ADDR DSK_ADR, 
LOG_MIX_INFO SIZE a 

RIB_NUMBER BIT (2h) , 
di_dump_designation NAME ; 


CSV_SIZE = 


TYPE_LENGTH (COLD_START_VARIABLES) ; 


DECLARE CSV COLD_START_VARIABLES REFERENCE; 
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HINTS 


The MCP global data is kept in a structure named HINTS. The data is used as a means of communica- 
tion among the SMCP, the MMCP, and GISMO. The HINTS structure also provides global storage 
for information that those programs need to save between the time periods they have control of the 
processor. 


The HINTS structure starts at memory address zero. The comment field immediately to the right of 
each variable declaration is the absolute address in hexadecimal of that variable. 


The following is a programmatic description of the HINTS structure. 


RECORD HINTS_RECORD 


1152055 


*The order of the following field declarations and their address must 
not be changed. The first data declaration must consist of this 
srecord. 
The first field is required by port interface hardware. Most of the 
srest are for the system memory dump analyzer (SYSTEM/IDA), although 
#some fields are needed by gismo and the MMCP. 
the first three fields are also used by clear start to keep the slave 
#out of harms way whilst initialisation is in process, and there are 
%insufficient structures and code present to control it. The source of 
*clear start should be consulted for final details. However, the 
eae ga at address 0) is used like this:- 

0 


% % purge cache memory, so that the slave's code can be 
% % changed by the master. (This does not purge the 
% * master processor's cache - only the slave's.) 
% 94000000 % move 24 bit literal to the A register. The six zeros 
% % are changed (by the master) to the address of the 
% % scratch pad and A-stack dump routine. When finished 
% % the slave resets the literal to zero. 
% 000000 % initialised to zero by the master, but used as a 
% % parameter for master-slave communication. 
DI SPATCH_WORD BIT(024)% HEX 000 
% Reference address of |/0 descriptor for dispatch. 
% For 1/0 initiate, the descriptor to be initiated. 
% Port devices yield address of |/0 just completed. 
ADDR_DP_PROC2 BIT(O24)% HEX 018 
FILLER BIT(024)% HEX 030 
MASTER_GISMO BIT(024)% HEX 048 


% Entry point to gismo. Used by interpreters and MMCP during 
% transfer of control to gismo. 
LOCN_MAKE_MCP_BE_HERE BIT (032)% HEX 060 


% Code address of MAKE _MCP_BE_HERE. Set during initialisation and 


% never changes. Used by the SDL2 interpreter when a needed MCP 
% code segment is not in memory. The stacks are faked up so that 
4 return from MAKE_MCP_BE_HERE returns to code as if the segment 
% had been present all the time. 


NO SLAVE_DMS BIT(001)% HEX 080 
; 

LOCN_INTERP_DICT BIT(024)% HEX 081 
* Address of the interpreter dictionary. Used by Gismo when 
* transfering control to the MMCP or an interpreter. 
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Ki_KO BiT(001)% HEX 099 
zy 

NO REINSTATES BIT(001)% HEX O9A 
% Not used. Replaced by SCHEDULER_BLOCK_COUNT. 

FIRE_UP_CONTROLLER BIT(001)% HEX O9B 


et when the NDL network controller is required. Tested in the 
* outer loop. (To avoid calling program initiation inline and the 
% associated stack space requirements. 
N_SECOND_ COUNTER BIT (002)% HEX O9C 
~™% Count of number of passes through N SECOND. Every fourth 
% N-second (when = 0), update the cold start variables on disk. 
* Primarily to ensure that the system date and time are reasonably 
accurate in the event of a system crash. 


MCP_ESN_ADDR BIT(024)% HEX O9E 
% Address of the MCP's environment structure nucleus (ESN). 
! MCP_LIMIT BIT(024)% HEX O9E 
* Top end of MCP writeable memory. 
LAST_OVLY BIT(024)% HEX OB6 
oints to the memory link of the most recently overlaid memor 
Mg te eek BIT(001)% HEX OCE 
Q_NOT_LOCKED BIT(001)% HEX OCF 


% Event bit that is caused (set TRUE, and waiting processes 
% checked) when the queue subsystem is available. 
% Checked by SMCP and MMCP. 
DFH_DIR_AD BIT(024)% HEX ODO 
% Address of the disk file header (DFH) dictionary. See also 
* DFH_DIR_LTH, MPF_DIR_AD, MPF_DIR_LTH. 
AUTO_GUARD BIT(003)% HEX OE8 
Used to control initiation of SYSTEM/BACKUP for autobackup 
% functions. 
FIRE SYSTEM_BACKUP BIT (003)% HEX OEB 
% When a clear start is not required, N second checks this field 
% and if non zero, initiates a copy of SYSTEM/BACKUP for 
4 autobackup, and decrements the count. Thus the autobackups are 
% scheduled one per N-second, and the system is not overloaded. 


FOUND BACKUP_DESIGNATION BIT(001)% HEX OEE 

% DL BACKUP pack is alive and well and on the system. 
INTERRUPT _DISABLE_BIT BIT(001)% HEX OEF 
TRACE _CONDITIONAL_HALTS BIT(001)% HEX OFO 


: SMCP conditional halts are to be entered into the gismo trace 
table. 


TRACE _HALTS_SETTUP BIT(001)% HEX OF] 
RAM_DISK_DISABLED BIT(001)% HEX OF2 
SYSTEM_OVRLAY_COUNTS BIT(O24)% HEX OF3 
FIRST_QUEUE BIT(024)% HEX 10B 


* Address of the first user run structure nucleus (RSN). The user 

* RSN's are a linked list ordered by processor priority. 
ADDR_OF_COLD_START_VAR BIT (O24) % HEX 123 

Address of the memory copy of cold start vaiables (CSV). 

ADDR_OF_INTERRUPT_INFO BIT(024)% HEX 13B 
Prior to 12.0, address of the interrupt queue header, and thus 
the interrupt queue. 12.0 uses the hardware MAXS register to 
find the interrupt queue, which is part of gismo's data area. 
The interrupt queue is maintained by gismo. 
The SMCP requests information from the interrupt message 
queue by using the FETCH SDL2 verb. The SDL2 interpreter then 
calls gismo with the relevant 503) er value. 


r dO dO do dO gE 00 008 


ILLER BIT (003 HEX 153 

N CCD BIT(001)% HEX 156 

ernne => The MCP is performin a task in control card driver for 
WFL. 


F 
| 
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F ELOG FULL BIT(001)% HEX 157 
*TRUE => the ELOG is nearly full (or full). At the next N-second 
pass, try to transfer the ELOG, and ish more space. 
; NON_RELEASE_MCP BIT(001)% HEX 
% The MCP sets this field when extra Beate g and debugging code 


% has been compiled into the MCP. Primarily intended for use by 
% plant personnel. 
i 

; G1 SMO_ LEVEL BIT(008)% HEX 159 

; H!] RESOLUTION_TIMER_SET BIT(001)% HEX 161 


STRUE => specie! T/O control (channel 15) for high precision 
% timings is present. Superceded by the TIME register on 
% M3 (B1860) and later processors. 
,  PSR_CHANGE_BIT BIT(001)% HEX 162 
*TRUE => pseudo readers should be examined for work at the next 
N-second pass. 


» [ RELEASE_LEVEL BIT(008)% HEX 163 

% 

! ale BIT (OO4)% HEX 163 
; goer BIT(004)% HEX 167 
J 

‘ FIRST_LINK BIT(O24)% HEX 16B 

% Address of the first memory link. 
. MCP _TYPE BIT (004) % HEX 183 

% Not used. 
‘ SYCOUNTER BIT(020)% HEX 187 


* Time of day in tenths of a second. Maintained every timer 


: interrupt by gismo without requiring the running process to save 
state. 
; SY_CNTR_MSK BIT(020)% HEX 19B 
% When SYCOUNTER (q.v.) reaches this value (i.e. time) wake up 
% the SMCP. The micro scheuler in gismo, after handling 
* interrupts, running a reader sorter use routine if required, 
% ensures that the SMCP will be selected when SY_CNTR_MSK is less 
# than SYCOUNTER. 
. SY_ PRIOR TIME BIT(020)% HEX JAF 
Previous N-second setting of SYCOUNTER. 
; RESERVED FOR_!INTERP_USE BIT(020)% HEX 1C3 
; SYSTEM _PACK_INFO BIT(024)% HEX 1D7 


Points to a linked list of pack info tables. One table for 
every ready pack on the system 
RED ALERT_RED_ALERT BOOLEAN% HEX IEF 
TRUE => non standard software has been supplied by the plant to 
$ a specific site. 


% 


132055 D-9 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
Memory Organization 


’ FILLER BIT (6) % HEX 1FO 
» CL SYSTEM_UNIT BIT(O12)% HEX 1F6 
% Absolute disk address of the primary system disk. 
I [ ova FER SPORT CHAN BIT (007) HEX 1F6 
! ae i BIT(003)% HEX IF6 
’ aye PER SEHANNEE BIT(004)% HEX IF9 
] 
’ DUMMY_BIT_RESERVED BIT(001)% HEX FD 
3 The serial number flag in a disk address must always be reset 
here. 
ae a BIT(004)% HEX I1FE 
; t CONSOUL SWITCHES a eae HEX 202 
} ! SE_ENABLE_VALUE BIT(4) % HEX 202 
’ MICRO _TRACE_FLAG ele taouts HEX 21E 
’ G1SMO_TRACE_SPACE BIT(O24)% HEX 21F 
% Address of the gismo trace header. The header consists of 
%  TRACE_SIZE BIT (24 
% TRACE OFFSET BIT (24 
% The 24 bits below the header is the trace mask. 
» CL PORT CHANNEL TABLE BIT(192)% HEX 237 
! PCT ENTRY (8) BIT(024)% HEX 237 


% This array is subsripted by PORT number to yield the address 
% of the channel table for that port. Processor ports do not 

% have channel tables. The soft 1/0 subsystem, which interfaces 
% to the master processor via the CMND and DATA registers, is 

% deemed to be on port 7. 


J] 
’ BYPASS CLEANUP BIT(001)% HEX 2F7 
STRUE => system panda can be removed from the name table. 
% 
’ CONTRL_CRD_FLG BIT(001)% HEX 2F8 
%TRUE => MCP is in control card driver.. 
; EXT _RESULT_DESC_CHAIN BIT(024)% HEX 2F9 


% Points to the first extended result descriptor in the chain. 
% See also EXT_RESULT_SAVED. 

; T_FILES BIT (008)% HEX 311 
% Count of number of temporary disk files (i.e. in the directory 
% but DFH_ PERMANENT = 1) encountered when cleaning up a disk. 

; MICR_COUNT BIT(006)% HEX 319 
% Count of the number of reader sorter files open. When the 
% first file is openned, hi-priority interrupt handling code is 
% made present in memory and marked save. 
% This code is segments 0 and 6 of the MMCP, and all the user 
% interpreter external segments. 


: CHANGE BIT BIT(001)% HEX 31F 
STRUE => oneee the active schedule upon return to the ouuter 
oop. 
’ RELEASE VERSION B1T(008)% HEX 320 
; SQ_IN_ PROGRESS BIT(001)% HEX 328 


A squash of the system disk is in process, and most other 
% activity on the system shouuld be stopped. Only zip input, and 
% AC, AX, DM, DP, DS or LP messages are allowed for the program 
% squashing the system disk (see Sp, y08 NUMBER) . 
: IOAT_POINTER BIT(O24)% HEX 329 
Starting memory address of the input output assignment table. 
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1OAT_END BIT(024)% HEX 341 
% Ending address + 1 of the IOAT. 
SYSTEM _PAUSE_DESC BIT(024)% HEX 359 
% Reference address of the pause descriptor in the disk chain. 
% The pause descriptor is in SYS PAUSE DESC. 
PSEUDO_TABLE_ADDRESS BIT (024)% “HEX 371 
% Address of pseudo readers in Heute & 
EMERGENCY _ODT_Q_REGENERAT! ON BIT (001) HEX 389 
STRUE => peu lg ine ODT queue at clear start. This must be set 
manually. 
SQUASH_START ING BIT(001)% HEX 38A 
A squash of the system disk has been requested. This is set in 
the procedure SQ. 
GISMO_OPTIONS BIT(024)% HEX 38B 
% Certain portions of gismo code are discarded depending on the 
% system configuration and MCP options. This field records what 


% was kept. 

! FILLER BIT(001)% HEX 388 
COMM_TRACE BIT(001)% HEX 38C 
GISMO_TRACE BIT(001)% HEX 38D 
FILLER BIT(001)% HEX 38E 
PORT_DEVICES BIT(001)% HEX 38F 
B1720_CODE se % HEX 390 
B1820_CODE BIT(O01)% HEX 391 
MPROC_CODE BIT(001)% HEX 392 
B1830_ CODE BIT(001)% HEX 333 
PRIORTTY_MEMORY_MGMT BIT(001)% HEX 39 
THRASHING_COUNTING BIT(001)% HEX 395 
LAMP_CPU_BASE BIT(OO1)% HEX 396 
FIXED _LAMP_DISPLAY BIT(001)% HEX 32) 
VAR_LAMP_BASE BIT ma: HEX 39 
FILLER BIT(001)% HEX 399 
VAR_LAMP_10 Brees HEX 39A 
FILTER BIT(001)% HEX 39B 
DCPU_CODE_PRESENT BIT(001)% HEX 39C 
FILLER BIT(006)% HEX 39E 


DCH_SCRATCH_MEM_ADDR BIT(024)% HEX 3A3 
Points to DCH _SCRATCH_MEMORY, which contains various variables 
% for NDL, such as the addresses of the network controller's 
% remote FIB, station FIB. For the complete list see 
% DCH _SCRATCH_RECORD. 


TASK _IN SCHED BIT (001g HEX 3Be % FOR WFL TASKS 
INTERRUPT _SWITCH_SET BIT (001 HEX 3BC 
DISABLE_INTERRUPT_SW BIT(001)% HEX 3BD 
FIRE_ODT_ROUTINES BIT(001)% HEX 3BE 


%TRUE => the next pass through N-second must fire up system/odt. 

JOBS RUNNING BIT(012)% HEX 3BF 

, % Count of jobs actually running. Used in N-second to calculate 
% the N-second interval. Value is 5 seconds per job, with an 
% upper limit of 1 minute. 
% The number of jobs controlled by the mix limit (ML) 
% LIMITED JOBS, a variable on the SMCPs data stack. 

BEEN THRU_MCP_BE_HERE BIT(001)% HEX 3CB 
*TRUE => have already tried to bring in an MCP code dictionary 

and dictionary. We are not suceeding, therefore, rather 

% than on a memory request that cannot be satisfied, and 
% one which cannot wait, we reluctantly halt the system. 


% 
REMOTE REROUTE BIT(001)% HEX 3CC 
ZTRUE => gismo communicate router should send remote file reads 
and writes to the SMCP rather than the MMCP. 


is in 
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: QUEUE REROUTE BIT(001)% HEX 3CD 
*TRUE => gismo communicate router should send queue file reads 
% and writes to the SMCP rather than the MMCP. 
% Whenever the SMCP uses queues (e.g. autobackup, job spawning 
replies), the SMCP code is always invoked. 
; DISK_MONITOR_GI SMO BIT (004)% HEX 3CE 
’ SAVE_DUMP BIT(001)% HEX 3D2 
% Save the system memory dump (SYSTEM/DUMPFILE), even if the size 
of SYSTEM/DUMPFILE is incorrect. The size of the system dumpfile 
depends on: 
- memory size of the system 
~ the size of the MCP layout tables (these allow symbolic 
analysis of the dump) 
- the size of the ODT queue 
R BIT(036)% HEX 3D3 
Was INTERPRETER_TABLE_ADDRESS prior to 12.0. 
This is still used by SYSTEM/IDA, to allow 11.0 dumps to be 
* analysed (to a certain extent). 
, ODT_PORT_CHAN RECORDS HEX 3F7 
% For a system using an ODT 1/0 control, this field contains that 
% port and channel. For a system not using an ODT 1/0 control, 
% this field is zero. The ODT control can be masked out (see 
* CHANNELS NOT_PRESENT) on a non gem if required. 


ts 
de der aeacac accede 


oa 
m 


ODT _PORT peters HEX 3F7 
’ ODT CHANNEL BIT(004)% HEX 3FA 
END 
’ KEYBOARD_ODT_DESC BIT(O24)% HEX 3FE 


Reference address of the |/0 descriptor used to communicate 
% with an ODT |/0 control. 


‘ LOCN BIOAW_RECOVER BIT(024)% HEX 416 
ot used. 
; CHANNELS NOT_PRESENT BIT(016)% HEX 42E 


% At clear start, channels can be ignored by use of the FA 

% register (on non gem) or the TEXT IC message (on gem systems). 
* This can be useful when a control has a problem and prevents 
% either a succesful clear start, or trouble free running. 


: LAMP_DATA_PTR BIT(O48)% HEX 43E 
» L SEGMENT HALT BIT(OO4)% HEX 46E 
! SPECIFI!C_HALT BOOLEANS HEX 46E 
% See HALT_MASK. 
, DUMP_AT_HALT BOOLEAN% HEX 46F 


% If either a SPECIFIC_HALT or STOP_AT_ALL_HALTS, take a full 
% system memory dump, clear this flag and then halt. 

% (DUMP_AT_HALT is reset to avoid cloberring a previous dump.) 
% See the 3H S @hhhhhh@ D message. 


: TRACE_HALTS BOOLEAN% HEX 470 

3 Conditional halts are to be entered into the gismo trace 
table. 
; STOP_AT_ALL_HALTS BOOLEAN® HEX 471 
1 TRUE => stop at all conditional halts. 

, HALT_MASK BIT(024)% HEX 472 
% Leftmost six digits of the SMCP sequence number (in hex) at 
% which to halt when the SPECIFIC_HALT flag is TRUE. See the SH 
% message. 
4 NB. this must match a CONDITIONAL_HALT sequence number. 
% The value is in hex so that in an emergency the values cah be 


o 


# easily entered from the console. 


» L MMCP_SEGMENT_HALT BIT(OO4)% HEX 48A 
! SPECIFIC _MMCP_HALT BOOLEAN HEX 4&48A 
% See MMCP_HALT_MASK. 
’ FILLER BOOLEAN% HEX 48B 
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’ TRACE MMCP_ HALTS BOOLEAN® HEX 4&8C 
7 hana conditional halts are to be entered into the gismo trace 
table. 
’ STOP_AT_ALL_MMCP_HALTS BOOLEAN? HEX 48D 
j *TRUE => stop at all MMCP conditional halts. 
: MMCP_HALT_MASK BIT(024)% HEX 48E 
% Leftmost six digits of the MMCP sequence number (in hex) at 
% which to halt when the SPECIFIC_MMCP_HALT flag is TRUE. See the 
% SH M message. 
% NB. this must match a COND! TIONAL_ HALT sequence number. 
% The value is in hex so that in an emergency the values can be 
: easily entered from the console. 
» CL COMPILE_TIME_OPTIONS BIT (008) % ues LAG 
Records compile time aaa ef the SMCP. 
! RELEASE VERSION _MCP T(OO1)% HEX 4AG6 
% The RELEASE option was ea 
’ DEBUG OPTION BIT (001) % HEX 4A7 
% The RELEASE option was reset 
’ FILLER BIT (006) % 6 MORE OPTIONS 
; t Eig eee epee BIT(OO04)% HEX 4AE 
! USE SLIO_ENV BIT 00 HEX 4AE 
* Use the SDL2 logical 1/0 evi oamep 
‘ USE DATACOMM_ ENV BIT (ool) e “HEX LAF 
% Use the SLIO datacomm and queue environment. 
- USE_|ISAM_ENV BIT(001)% HEX 480 
% Use the SLIO ISAM environment 
; ; FILLER BIT (001) % HEX 4B) 
; MCP VERSION DATE BIT(O016)% HEX 4B2 


% Compilation date of MODO2. Since this module should be 
% recompiled for sues patch to the MCP, this should yield the 
% MCP compile dat 
% Format YY bit 7, "MM bit 4, DD bit 5. 
$ DMS _MM_EVENT BIT (001) HEX 4C2 
% When the DMCP cannot proceed because memory management is 
Hy active this event bit is FALSE, and the DMCP is hung on it. 
; DMS_MM_COUNT BIT(006)% HEX 4C3 
"When memory management is about to overlay a DMS buffer, this 
field is bumped. If the new value is one, DMS_MM_EVENT is reset 
so that the DMCP will not try to use buffers. — 
DELETE_DMS_BUFFER (in ALLOCATE_S MEMORY) then performs 
additional checks. 
When memory management has finished, this field is decremented, 
and if the new value is zero, DMS _MM_EVENT is caused, to awaken 
% any DMCP which may be waiting 
; CURR_INTERP_DIC_ENTRIES BIT (005) % HEX 4C9 
Size of the interpreter dictionary. Default size is seven (7). 
% The MMCP, GISMO and the SDL2 interpreter occupy entries 0, 1 and 
% 2 respectively. Thus four user interpreter slots are available. 
% The size can be changed with the IC ODT message. A Clear/Start 
% is required to change the size. 


SE CE CE OS CECE eE 


. DM GLOBALS BIT(O24)% HEX ACE 
% Pointer to a linked list of DMS GLOBALS. 

‘ QUEUVE_ ROOT Bah oo LE6 
% Points to the queue subsystem global 

; T0- S_COMM_QUEUE BIT (024) % “HEX LFE 
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DC_ CHAIN BIT(O24)% HEX 516 
% Points to a linked list of DC_POCKET_RECORDs, which remember 
% which job is using which adapter. Unusually, a null list is 
% indicated by 0. 
TRUTH _TABLE_ADDR BIT(O24)% HEX 52E 
% Contains the address of the truth table. This table contains a 
% bit for each patch number. Therefore, all the bits upto the SMCP 
% patch level should be on, and all those after should be off. 
% This is built and checked during clear start. If the table fails 
% the check, then we halt with L=@000011@, T=@333333@. The halt 
% itself is push through, but that decision should not be taken 
% lightly ~ patches are missing, and patches are quite often 
% interdependent. Contains zero when not set up. 
FILLER He US HEX 546 
S_C Q EV BIT(001)% HEX 552 


~% Smcp Communicate Queue EVent. 
*TRUE => There is at least one program waiting for the SMCP to 
% handle the progam's communicate. 

M_C_Q_EV BIT(001)% HEX 553 


~% Mmcp Communicate Queue EVent. 
* On 10.0 and earlier releases, TRUE => there is at least one 
# program waiting for the MMCP to handle the program's 
% communicate. 
% On 11.0 and later, gismo uses a different mechanism to awaken 
* the MMCP, and this field is not used. 
* |f a program is running, and executes a communicate for the 
% MMCP, then the gismo communicate router will run the MMCP for 
% that program. 
% |f a program is waiting in the MMCP communicate queue or the 
* |/0 complete queue, the MMCP will be executed based on the 
% program's priority compared to other programs. 
S_M_Q_EV BIT(OO1)% HEX 554 
% Smcp Message Queue Event. 
*TRUE => there is a message for the SMCP in the interrupt 
4 queue. These messages are usually |/0 complete 
% messages (loosely interru 


ts). 
S_1_Q EV BIT (001) % HEX 555 
% Smcp Interrupt Queue Event. 
*TRUE => there is a high priority message in the interrupt 
% interrupt queue. 
* This has not been used since 6.1 when high priority handling 
% (for reader sorters) was moved to the MMCP. 
* Kept here in case we ever want to put some high priority 
% processing in the SMCP. 
M_M_Q_EV BIT(001)% HEX 556 
% Mmcp Message Queue Event. 
STRUE => there is a message for the MMCP in the interrupt 
% These messages are always |/0 complete messages 
% (loosely interrupts). 
M_1_Q_EV BIT(001)% HEX 557 
% Mmcp high priority Interrupt Queue Event. 
*TRUE => there is a high priority interrupt for the MMCP. 
% Currently only used for reader sorters. 


me cnust HOEK BIT(00O1)% HEX 558 
meer BIT(005)% HEX 559 
M_MCP_LR BIT(024)% HEX 55E 


A psuedo limit register (processor LR) for the master MMCP. See 
% MASTER MMCP_DATA PTR. 
BOTA ADDRESS BIT(O24)% HEX 576 


% by gismo. 
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MCP_RSN_ADDR BIT(024)% HEX 58E 
% Memory adddress of the SMCP's run structure nucleus (RSN). 
DISK TABLE BIT(024)% HEX 5A6 


ontains the drive transformation vector which is loaded to the 
% DSC to allow drive numbers to reassigned at no cost to the MCP 
% or gismo. The vector is actually loaded by system init. The 
* purpose here is to inform the user that drive transformation 
% has occurred. 
! DRIVE_NBR (8) BIT (003) 


TASK_MIX_NO BIT(O14)% HEX S5CE 
JOB_MIX_No BIT(O14)% HEX 5DC 
WFL_QUEUE_ADDRESS BIT(O24)% HEX 5EA 
% Address of the WFLQUEUE, ue is the queue of WFL commands 
BIT 
BIT 


a 


% between the MCP and SYSTEM - Also used by the RIB mechanism. 
NC_QUEUE_ADDRESS 02 


(024)% HEX 
% Not used yet. 


FILLER l (oui) 8 HEX 61A 
M_MCP_Q_IDENT BIT(008)% HEX 636 
COMM_SPLITTER_ADDR BIT(024)% HEX 63 


emory address of the array used by the communicate router in 
gismo to route communicates to the appropriate part of the MCP 
% eo caet *=>MMCP, 2=>DMCP) or a special system environment 


% (3=>IBASIC). Each entry is 3 bits wide. 
COMM_SPLITTER_LENGTH BIT(016)% HEX 656 
Tength of the comm_splitter aris See above. 
FIRST_RUN_UNIT BIT(024)% HEX 666 


% Cobol74 style IPC uses the verb call. Passing parameters 

% between different tasks is permitted. Each such group of tasks 
4 is called a run unit. This points to the first in the linked 

* list of run units. 


INDEX_SEQ_USER_COUNT BIT (008)% HEX 67E 
% Count of the number of ISAM (Cobol 74 or RPG $IXSEQ) files 
open. 
MIKES_HALT_SPACE BIT(096)% HEX 686 


% When the system comes to a controlled halt, the values of the 
L, T, X and Y registers are stored here. 


! FILLER BIT (048 
SMCP_HALT_NOMEM_SEQ_NO BIT(032)% HEX 6B6 
FILLER BIT (016 
RIB_LIST BIT(024)% HEX 6E6 
: (RIBa, to the linked list of routing information blocks 
RIBs). 
LAST_LINK BIT(O24)% HEX 6FE 
% Memory address of the last memory link. 
SMCP_CPU_PRIORITY BIT(024)% HEX 716 


The current SMCP processor priority. The micro scheduler in 
% gismo uses this field rather than the field in the SMCP's rsn, 
* because since the RSN is above the MCP_LIMIT register, the SMCP 
% cannot write to the RSN field. 


[ LAMP. GLOBALS BIT(O14)% HEX 72E 
! LAMP SCALE Bir ioaaye HEX 72E 
[ VL ALLS BIT(003)% HEX 731 
1 VL_AUCPU Beige % HEX 731 
VL_AUCOLAY BIT(0O1)% HEX 732 
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VL_AUDOLAY BIT(001)% HEX 733 
FILLERC BIT(001)% HEX 734 
VL_SSWC BIT (001 % HEX 135 

[ LAMP OPTIONS BIT (004) % HEX 
t FLAMPS BIT (001) HEX! O36 
[ VLAMPS BIT(002)% HEX 737 
! VLAMPS_CPU_OLAY BIT (ele HEX 73 
VLAMPS—10 BIT(001)% HEX 73 

VLAMPS_BAR_GRAPH BIT(001)% HEX 739 
VL_SMCP_OLAYF BIT (002)% HEX 73A 
! VL_SMCP_OLAY BIT {001)§ HEX ~73A 

VL~SMCP_OLAY_USE BIT(001)% HEX 73B 

JOBS_SWEEPS_BEFORE_DECAY BIT (010) HEX 73¢ 
SYSTEM_ID BIT(012)% HEX 746 
! CPU TD BIT(004)% HEX 746 
O=ERROR 1=B1710 2=B1720 
3=B 1830 4=B 1860 
5=B1900 6=B 1900 (GEM) 
MEMORY_ 1D BIT(004)% HEX 74A 


- age 1=CORRECTABLE S-MEMORY PARITY 


1D BIT(0OO4)% HEX 74HE 
OeDEFAULT 
ELOG HERE BIT(024)% HEX 752 
QLOCK COUNT Blt eoLys HEX 76A 
CHIP TABLE ADDRESS BIT(O24)% HEX 76E 
MIX _MEMORY_PRIORITIES BIT(016)% HEX 786 
# Treated as MEMORY_PRIORITY(16) BOOLEAN. If there is a job in 


Stn: mix, with memory priority n, then MEMORY_PRIORITY(n) will be 
STOP_SCHED_ItNPUT BIT(001)% HEX 796 
o not bring any more tasks out of the active schedule. 
% Set when: 
- the system is thrashing (i.e. full) 
% - a squash of the system disk is scheduled 
% - the number of running jobs would exceeed MAX_ TASKS. 
NSEC_DISABL_THRASH FAULT BIT(001)% HEX 13f 
DISABLE_THRASHING FAULT BIT(001)% HEX 79 
MCP_VARTABLE_MEM_PRIORITY BIT(004)% HEX 799 
* The current memory priority to be used for SMCP memory 
 % requests. When performing work on behalf of a program, the SMCP 
will set this field to that program's memory priority. 
DOING_FILE_ATTRIBUTE_COMM BITC % HEX 79D 
GOTTA _DR_OR_TR BIT (2 % HEX 79E 
% Checked at N-second to remind the operator. 
! GOTTA_DR BIT(1) % HEX 79E 
Waiting for an operator DR before releasing the schedule. 


rr ee ee ee, ee, ee ee 
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GOTTA_TR BIT(1) % HEX 79F 
Waiting for an operator TR before releasing the schedule. 


MEM_SWEEP_PENDING BIT (001) % HEX 7AO 
"A gismo memory sweep of memory links is required. The actual 
sweep can be delayed a few clock due to pressure of other work. 


SAMPLING CLOCK BIT(006)% HEX 7Al 
SAMPLING INTERVAL BIT(006)% HEX 7A7 
MEM_SWEEP_INTERVAL BIT(010)% HEX 7AD 
MAX_SWEEP_ INTERVAL BIT(010)% HEX 787 
MEM_EXTEND_COUNT BIT(002)% HEX 7Cl 
OVERLAY_COUNTER BIT(008)% HEX 7C3 
OVERLAY TARGET BIT(008)% HEX 7CB 
MCP_SWEEPS BEFORE_DECAY BIT(O10)% HEX 7D3 
MEM _DUMP_COMPLETE — BIT(001)% HEX 7DD 
% Set by system/init to record the fact that a system memory 


% dump was taken during clear start. During SMCP initialization, 
* this conditions the memory dump completed message. 
MAX MEM_PRIORITY_IN_MIX BIT(004)% HEX 7DE 
% Highest active memory priority. The SMCP uses this priority 
* when performing general housekeeping. The point is to avoid 
introducing another active memory priority. 
COMMAND_LOGGED BIT (0013 % HEX 7E2 
sed by control card driver (CTRL_CARD FORIVER) to ensure that 
% commands are entered in the WFL job log exactly once. Set when 
the command has been logged. 
CONTROLLER_ SCHEDULED BIT (001) % HEX 7E3 
% Since the NDL newtork controller has been scheduled, please do 
* not fire up another copy if remote file open is received before 
% the network controller has initialized. 


DCPU_ID BIT(002)% HEX 7E4 
Set by system/init to record which processor (A or B) in a dual 
processor environment is master, and which is slave. 
MASTER aoe HEX 7E4 
SLAVE BIT(001)% HEX 7E5 
TASK TABLE ADDR BIT(024)% HEX 7E6 
CLEAR_START_REQD BIT(OO1)% HEX 7FE 
SCHEDULER_ BLOCK. COUNT BIT (008) % HEX 7FF 
% When <> 0, the micro scheduler in gismo will only run reader 


4 sorter use routines, or the SMCP. Bumped by SMCP procedures that 


% desire to have complete control of the system for awhile. 
FIRE MCS BIT(001)% HEX 80 


DCPU~DATA BIT(024)% HEX 80 
MASTER_PORT BIT(003)% HEX 820 
SLAVE_PRESENT BIT(001)% HEX 82 
SLAVE~PORT BIT(003)% HEX 82 
FIRE_NDL BIT (001) % HEX 82 
WFL_JOB_NO BIT(016)% HEX 82 
[CACHE BITS BiG % HEX 838 
NO_RAM_DISK_1 BIT(1)% 
NO_~RAM_DISK_2 BIT(1)% HEX 839 
NO_CACHE_1 ant % HEX 83A 
NO_CACHE 2 BIT(1)% HEX 83B 
CACHE _PRESENT_1 BIT(1)% HEX 83C 
CACHE PRESENT_2 BIT(1)] % HEX 83D 


D-17 


D-18 


9 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
Memory Organization 


FILLER 
BNA_ADDRESS 
REAL_MEMORY_SIZE 


BIT(024)% HEX 840 


BIT (024) § HEX 83E 
BIT(024)% HEX 858 


Highest memory address (in bits) on the system (i.e. MAXS-1). 
% Note that both processors, and the memory base must have the 


% same settings. 
PSEUDO MEMORY SIZE 


* Highest memory address (in bits) 


BIT(024)% HEX 870 
on the system. Will be less 


% than REAL_MEMORY_SIZE if the LR register was set at clear start. 
* NB: It is no good trying to use this to find a L=@0D0055e@ 

% problem since the memory is still present. ALL the relevant 
% MAXS jumpers must be changed. 

* L=@0D0055@ cannot occur on a 2MByte system. Therefore for 

# "strange" problems try reducing memory ON Bae MAXS JUMPERS. 


TIME MARK 
MASTER_MMCP_DATA_PTR 


BIT ue HEX 
BIT(024)% HEX 8A0 


* Address of the master MMCP's data. This should match MMCP_LR. 
* Also used as a pseudo limit register in syerem halts. 
B 


SLAVE_MMCP_DATA_PTR 


BIT (024)% HEX 


Address of the slave MMCP's data 


FILE ADDR 


BIT(024)% HEX 8DO 


% 

ony 2. 

% Address of the queue descriptor for messages to SYSTEM/ODT. The 
% queue is called ''FROM-MCP". 


Uu 
SYS _ODT_JOB_NO 


BIT(016)% HEX 8E8 


* Job number of SYSTEM/ODT. 


SYS _ODT_DIO_DISK_DESC_ADDR 


ADDRESS% HEX 8F8 


% Address of the |/0 descriptor that SYSTEM/ODT uses to access 
% the disk area known as SYSTEM/ODT-QUEUE. This should not be 
* confused with a queue es used for queue files. 


SYS_PAUSE_DESC 


T (272) 


% The head of the disk chain. Used as a marker by Gismo, to 
* ensure that the full chain is searched at least once, and no 


% more than twice. 
EXT RESULT_EXISTS 


BOOLEAN 


4TRUE => EXT_RESULT_SAVED and ial are valid. 
9 


EXT_RESULT_SAVED 


BIT 


* Saved extended result descriptor. 


EXT RESULT_HIT_DESC 


BIT (175) 


% Saved Teft hand part of the |/0 descriptor in error. 


DFH_DIR_LTH 


WORD 


* Length of the disk file header dictionary. See also DFH_DIR_AD. 
WORD 


MPF_DIR_LTH 


4 Length of the Multi-Pack File dictionary. 


MPF _DIR_AD 


ADDRESS 


* Address of the start of the Multi-Pack File dictionary. 


LOCN _DESC_BIOAW_RECOVER 


ADDRESS 


Address of the system descriptor containing the code for 
* BIOAW RECOVERY. Built during initialisation and never changes. 


TRACE_HALT_DA 
TRACE_HALT BUF_PTR 
SQ_JOB_NUMBER 


ADDRESS 
ADDRESS 
BIT (16) 


% Job number of the system/squash program which is squashing the 


% system disk. 

SQ_MSG_ADDR 
Not used. 

MASTER_IDLE_ TIME 

% Total idle time for 
SLAVE_IDLE_TIME 

% Total idle time for 
SMCP START TIME 


Maintained by gismo. 


SMCP_SERVICE_ TIME 


% Maintained by gismo. 


ADDRESS 


PROCESSOR_TI ME 
the master processor. 
PROCESSOR_TIME 
the slave processor. 
PROCESSOR_TIME 
The SMCPs processor time at the start. 
PROCESSOR_TIME 
The total SMCP service time. 
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MEM_STATISTICS_ADDR ADDRESS 


Address of the table used to maintain memory usage statistics. 
WORD 


PROTECTED _FILE_COUNT 


When the system disk is being cleaned up (in DISK_CLEAN_UP), 

a count is kept of PROTECTION=PROTECTED files encountered. 
Should this field be non zero, then the program in the PAN 

slot in the name table (usually SYSTEM/PANDA), will be initiated 
to handle correcting the end of file pointers for those files. 


[ ce ea BIT (144) 


J 


EXP 
EXP_1BASIC_INTERP_TIME 


When a job is teminating (i.e. dying or expiring), it's various 
% processor times are added to these totals. 
EXP_PRIMARY_!INTERP_TIME BIT (24) 
EXP_PRIMARY_SMCP_TITME BIT (24) 
EXP_PRIMARY_MMCP_TIME BIT 
EXP_DMS_INTERP_TIME BIT 
BIT 
BIT 


DMS_SMCP_TIME 


CLARE HINTS HINTS_RECORD; 


This must remain the first declare, so that the space appears 
first in the data stack, and thus at absolute address 0. 


RECORD INTERP_DICT_ENTRY 


1152055 


One entry for each firmware file used by the running 
* system. Entry 0 is MMCP, 1 is GISMO, and 2 is the SMCP's 
% interpreter (SDL2/INTERP for 11.0, SDL2/INTERPIM for 12.0). 
SEG_DIC SYSTEM_DESCR, 
% The system descriptor for the interpreter's segment 
% dictionary (if any), else for the non-segmented code. 
% This descriptor is callled the ED or external descriptor. 


FILLER BIT (8), 
* Prior to 12.0 was:- 
% ENTRY_IN_USE BOOLEAN, 
% RSDNT USERCOUNT By 
DATA_SPACE_STZE BIT (24) , 


% Size of the interpreter's work space (if any), to be 

% attached to the environment. 
PRE_INIT_DATA_SIZE BIT (16), 

% Size of the work space to be initialised from the 

% interpreter code file (only valid when DATA_SPACE_SIZE > 0). 
INIT _DATA_OFFSET BIT (16), 

Offset of the pre-initialised work space in the interpreter 

% code file (only valid when PRE_INIT_DATA_SIZE > 0). 
GLOBAL_SEG SYSTEM _DESCR, 

* System descriptor for the interpreter's global (or main) 

% segment. The version is in hex (4 bytes) before the check 

% sum at the end of the segment. 

% This descriptor is called the GD or global descriptor. 
ENTRY_IN_USE BOOLEAN, 

% |f TRUE, this entry is in use and all fields are valid. 

% if FALSE, this entry is free (and all fields refer to the 

% most recent occupant) or the entry is being built (and 

% field values relect our progress). 

4 Note that this bit is set as the last order of busness. 
RES |IDENT_USER_COUNT BIT (15), 

% Number of environments using this interpreter that are not 

% rolled out. 


TOTAL_USER_COUNT BIT (15), 
% Total number of environments using this interpreter. 
FILLER BOOLEAN, 


% To allow the following fields to stay byte aligned for 
% ease of debugging. 
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ARCHITECTURE_NAME NAME, 
The name of the architecture for this interpreter, 
% e.g. SDL2, COBOL74, RPG. 
COMPILER LEVEL BIT (8), 
* An integer representing the level of the S-machine for this 
: architecture. Checked against a corresponding program PPB 
field. 
ARCHITECTURE_ATTRIBUTES BIT (80) , 
Used for checking minor S-machine changes (such as adding 
# an S-op) that are not significant enough to warrant a level 


change. 
INTERPRETER_NAME NAME_RECORD, 
The name of the interpreter on disk. 
[DFH ADDR DISK ADDR! 


% The disk address of the interpreter's DFH. 
AREA_ADDRESS_FOR_MMCP_GISMO_SDL2 DISK_ADDRI], 

For MMCP, GISMO, SDL2 interpreter it is too difficult to 
* build the DFH address. So we settle for the area address. 


VERSION BIT (32), 
Contains the interpreter version. For use by ISSA. 
FILLER BIT (36) ; 
% Available for future use. This filler is used to extend 
% the size of an entry to 768 bits, so that Gismo can 
# compute the offset of individual entries by two shifts and 
# an add (i.e. to require the same amount of work as 224 bits 
* required prior to 12.0.) (which is required every time a 
# task is reinstated). 
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RUN STRUCTURE NUCLEUS 


As shown in figure D-1, the run structure nucleus includes variables that point to the next task in the 


mix, the file dictionary for the task, and the environment dictionary for the task. 


A programmatic description follows. 


% 
SET rs_status_types MEMBER (15) = 
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executing 

no_file 

no_user_disk 
duplicate_ library 
duplicate _input_file 
possible du 

waiting for_hardware 
program_ stopped 
waiting 10 complete 
wtg_ datacomm_msg 
waiting_over vay 
waiting_kbd_in 

hdwr not _ready 
waiting_ Operator_action 
waiting_ close 

waiting DS or_DP 
no_mpf_pack 

no_ file_on_disk 

wal ting_ ~for_locked_file 
waiting_q_ is full 

wai t_ status 

nomem _wai ting _comm_q 
nomem_waiting_ready_q 
wtg_port_open 

wtg_pgm_ call 

waiting time_comm_q 
waiting_ time_ _ready_ q 
waiting receive 
wtg_datacomm_opn 
terminating 

in_ready_q 

in_comm_q 

stopped for sort 
wtg_de_dsk_cmp!t 
wtg_datacomm_dsk 
no_controller 
no_output_pack 

vsort _qsort_ not present 
no_sort_ input_ file 

wal ting_ ~contention 
waiting syncpoint 
waiting_ recovery 
waiting_ new_audit 
waiting_ sorter_10 
terminating_ walting_ 10 
closing _waiting_1!0 
waiting forms 
no_translate_file 
mf_searching 
no_DMS_file 

no_DMS_— dictionary 
wtg_DMS_reorganization 
wtg_ inactive data_base 
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no_usercode 
walting_to_be called 
wtg_program_exit 
wtg_called _pgm_BOJ 
wtg_rel_area_init 
wtg datacomm_ result 
wtg_beginning_label 
no_program 
ue _host_services 
_host 
malting. task_completion 
waiting _system_lock 
no_disk ~WFL _log 
no_ . DMS_accessroutines 
wal ting_ server_message 
wai ting_ “protected file 
»waiting_schedule_disk 


»waiting sort_disk 


CONSTANT MAX_REASON 


Memory Organization 


71% Used when program call could not 
% schedule the callee, because of 
* lack of disk space. 

72% Used when sort initiation failed 
% because no Q_DISK was available. 


TYPE_LENGTH(rs_status_types) - 1; 
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RECORD 
RS_NUCLEUS 
RS_CUR_ENV_ADDR BIT (24) , 
SABSOLUTE ADDRESS OF THE CURRENT ENVIRONMENT NUCLEUS 
%INCLUDED FOR EASIER AND FASTER ACCESS BY MMCP AND GISMO 
RS_CUR_ENV_INDEX BIT (16), 
SNUMBER OF THE ENTRY IN THE ENVIRONMENT DICTIONARY FOR 
%THE CURRENTLY ACTIVE ENVIRONMENT 
RS_ENV_DICT_SIZE BIT (16), 
ZNUMBER OF ENTRIES IN THE ENVIRONMENT DICTIONARY FOR THIS 
%JOB. CURRENTLY WE ALWAYS ALLOCATE 'MAX ENVIRONMENTS! 
ZENTRIES AS FOLLOWS (EXCEPT FOR THE SMCP, WHICH HAS 1): 
O - THE PRIMARY ENVIRONMENT (THE EXECUTED PROGRAM) 
% 1 =- AN ASYNCHRONOUS MCP ENVIRONMENT (NOT IN 
INITILAL |MPLEMENTAT 1 ON) 
- A DMS ENVIRONMENT 


2 
3 - A SPECIAL ENVIRONMENT (USED BY IBASIC) 


HE TABLE IS SIMPLY A LIST OF ABSOLUTE MEMORY ADDRESSES 
F AN ENVIRONMENT HAS NOT BEEN ALLOCATED, THE ADDRESS 
*FOR THAT ENTRY WILL BE ZERO. 
RS_ENV_DIC POINTER ENVIRONMENT_DICTIONARY, 
RS_FIB DIC BIT (24), 
%SMEMORY ADDRESS OF THE FIB DICTIONARY 
RS_SELF_ADDR BIT (24 
SMAKES IT EASIER TO SEARCH FOR AN RSN AT A SPECIFIC 
*ADDRESS, AND ALSO SERVES AS A CHECK THAT A STRUCTURE 
%1S (ACTUALLY AN RSN 
RS_MCP_BIT BOOLEAN 
%IF TRUE, THIS IS THE SMCP'S RSN. NOTE THAT THI 
ZDUPLICATES A BIT IN THE ESN. THE ESN BIT IS PR 
*FOR THE CONVENIENCE OF THE INTERPRETER, AND TH 
*MAINLY FOR THE CONVENIENCE OF SMCP 


4 
% 
& 
x4 
4T 
4 | 


RS_ODT_|INPUT_PRESENT BOOLEAN, 
%*INDICATES THAT AN AX WAS DONE 
RS_TRACE_BUF_ ADDR BIT (24), 


*MEMORY ADDRESS OF THE TRACE BUFFER IF THIS 

*JOB 1S TRACING - SHARED BETWEEN ALL ENVIRONMENTS 
RS_TRACE_BUF_ OFFSET BIT (16), 

*CURRENT OFFSET WITHIN THE TRACE BUFFER 

*PREVENTS CONFLICT WHEN TRACE 1S ACTIVELY SHARED - FUTURE 


RS_SWITCHES BIT (40), 
%10 4-BIT SWITCHES: SWwO-9 
RS_!PC_DICT_ADDR BIT (24), 


SABSOLUTE ADDRESS OF THE IPC _DICTIONARY FOLLOWING THIS 
RS NUCE EUS: (FOR IPC) 
RS_ ae DItTT SIz BIT (16), 
SNUMBER aE ENTRIES IN THE IPC DICTIONARY 
RS_CALLERS_RSN_ADDR BIT (24) , 
%RSN ADDRESS OF THIS JOBS CALLER 
RS_LAST_L1IO_STATUS_ SIZE BIT (16), 
*S1ZE OF LAST_LIO_STATUS MASK 
RS_LAST_LIO_ STATUS PTR ~ BIT (24), 
%ADDRESS OF LAST_LIO_STATUS MASK 
RS_SLAVE_ BLOCKED_CNT RECORD 
*NUMBER OF BLOCKS ON THE SLAVE SCHEDULER FOR THIS JOB 
RS_BLOCK_CNT BIT (6 
S_Q_LTNK BIT (24), 
SPOINTER TO THE NEXT JOBS RS NUCLEUS 
4FIRST_QUEUE POINTS TO 1ST JOB; LAST JOB CONTAINS @FFFFFF@ 
RS_LAST_TOP BOOLEAN, 
SIF SET, INDICATES THAT THIS JOB WAS THE LAST ONE 
SCHEDULED WITHIN ITS PRIORITY CLASS 
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RS_Q_IDENT BIT (24), 
*THE rece THAT THIS JOB 1S CURRENTLY IN 
= READY 


1 S COMM 0 

; EXTERMINATE _-Q 
|OC_Q. Waiting for MCP to handle an |/0 complete. 
0 M_COMM 

] WATE 
2 = NOT QUEUED. 

The program may have a processor (i.e. be truly 
executing), Gismo soft 1/0 may be running (as a 
result of an interrupt whilst we were), or the 
SMCP may be fiddling with the RSN. 

RS_NEXT_Q BIT (24), 
*1F THIS JOB IS IN THE WATE_Q, THE QUEUE IT SHOULD BE 
*PLACED IN WHEN IT !S CAUSED 


] 
] 


BO dO dO dO BEDE DO BOGE aE dO 


RS_TERMINATING BOOLEAN, 
ZTHIS JOB IS TERMINATING - PREVIOUSLY WE HAD TO TEST 
RS_REASON BIT (8), 


% USED BY MULTI-THREADING PROCESSES TO INDICATE PROGRESS 

% SO FAR. SHOULD BE CLEARED AT THE END OF THE COMMUNICATE. 

% ALSO USED DURING TERMINATE (CONDITIONED BY RS _TERMINATE) 
RS_STATUS MEMBER OF rs_status_types, 

*GIVES THE CURRENT STATUS OF THE JOB 

% refer to the set declared immediately preceding. 
RS_PRIORITY_INTEGER BIT (4), 

*PROCESSOR PRIORITY - 0-15 ALLOWED 
RS_JOB_NUMBER_IN_DECIMAL BIT (16), 

= E.G, JOB NUMBER 1753 WOULD BE @1753@ 
RS_PAUS BIT (24 


- ST IME TO WAKE THIS JOB IF SLEEPING 

RS_WAIT_LEN BIT (12), 
*LENGTH OF RS_EVENT_SPACE 

RS_WAIT_LOC BIT (24), 
SADDRESS OF RS_EVENT_SPACE 

RS_DISABLE_INTERRUPTS BiT (6), 
%iF THIS FIELD 1S GREATER THAN 0 THEN THIS JOB MAY NOT 
SBE INTERRUPTED BY HIGH PRIORITY INTERRUPTS. 

RS_USE_ FLAG BOOLEAN, 
*IF TRUE, JOB 1S CURRENTLY ACTIVE IN A 
*USE ROUTINE 

RS_REPORT_EV_INX BOOLEAN, 
%USED BY PROCESSES THAT WISH TO HANG JOBS AND HAVE THE 
SEVENT WHICH WAKES UP THE JOB REPORTED IN THE RS 
% (USED BY M_WAIT AND COMPLEX WAIT) 

RS_STATE_L1GHT RECORD 

RS_VLAMP_DATA RECORD 

%USED BY THE LAMP CODE IN GISMO TO DISPLAY ACTIVITIES 
*BY JOB. INITIALLY, INFORMATION WILL BE SUMMARIZED FOR 
*ALL OF THE JOBS ENVIRONMENTS 


RS_VL_2FLAGS RECORD 
RS_VARIABLE_LAMP_CPU RECORD 
%USED TO DISPLAY JOB CPU ACTIVITY 
RS_VL_CPU_GRP BOOLEAN, 
cup Rone aoPULUSE BOOLEAN 
ND, 
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RS_VARIABLE_LAMP_CODE_OVLY RECORD 
*USED TO DISPLAY JOB CODE OVERLAYS 
RS_VL_COLAY BOOLEAN, 
FILLER BOOLEAN 

END, 


RS _VARI ABLE LAMP_DATA_OVLY RECORD 
*USED TO DISPLAY JOB DATA OVERLAYS 


RS VL DOLAY BOOLEAN, 
FILLER BOOLEAN 
END 
END, 
FILLER BIT (10) 
END 
END, 
RS_TIME_EVENT BOOLEAN, 
RS_ NULL EVENT BOOLEAN, 
RS_JOB_ NUMBER BIT (16), 


4CONTAINS THE JOB NUMBER ASSIGNED TO THIS JOB. ASS!GNED 
4WHEN THE JOB 1S SCHEDULED. JOB NUMBER IS USED ON ANY 
*0DT INPUT MESSAGE THAT REQUIRES JOB IDENTIFICATION. 
4BEGINS WITH 1 AND as ac AT 9999 

BIT (2), 


* O = RUNNING 
% 1 = DS OR DP-ED 
* 2 = CANCELED 
* 3 = DUE TO DEATH IN FAMILY 
RS_DC_!0_COMPLETE BOOLEAN, 
%THIS EVENT 1S CAUSED WHENEVER A DATA COMM 1/0 OR 
*AN INITIALIZER 1/0 COMES COMPLETE 
RS_DATA_COMM BOOLEAN, 
*%1F TRUE, JOB HAS ae A DC INITIATE_ 10 
RS_SORTER_FLOWING BOOL 
~*MICR JOB WITH READER/SORTER CURRENTLY IN FLOW MODE 
RS_ROLLOUT_BITS RECORD 
RS_TO_BE_ROLLED_OUT BOOLEAN, 
“SIF TRUE, JOB 1S A CANDIDATE FOR ROLLOUT - DO IT NEXT 
%N _SECOND 
RS_NOT_A_ROLLOUT_CANDIDATE BOOLEAN 
=D: *1F TRUE, JOB HAS BEEN HUNG BUT CANNOT BE ROLLED OUT_ 


RS _ROLLOUT IN_PROCESS BOOLEAN, 

ZIF-TRUE, JOB 1S IN PROCESS OF BEING ROLLED OUT 
RS_ROLLIN_IN_PROCESS BOOLEAN, 

“IF TRUE, JOB IS IN PROCESS OF BEING ROLLED IN 
RS_PREVENT MOVE BOOLEAN, 

%1F TRUE, THIS RSN MAY NOT BE MOVED 

#NO CURRENT USES 
RS_DISPLACED T (24) , 

*THE DISTANCE THIS RSN. HAS BEEN MOVED 
RS_MEDIA BO 


OLEAN, 
%1F RESET, THEN SOME ENVIRONMENTS MAY BE ROLLED OUT 
RS_ INTERVENTION BOOLEAN, 
%SMCP NEEDS TO DO SOMETHING TO THIS JOB BEFORE 
*THE MMCP CAN HAVE IT (USUALLY ROLLIN) 


RS_ABORT 
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RS_M_PROBLEM RECORD 


*REASON WHY THE MMCP OR GISMO TURNED CONTROL OF THIS 
*JOB OVER TO THE SMCP 


RS_M PROBLEM_TYPE RECORD % FOR SDL 
RS_M_PROB_P1 eee % FOR MIL 
% T#L10 PROBLEM (SEE PARAMETERS 


% 3=F1B DICT NOT PRESENT 

% 5=RS_INTERVENTION SET 

% 7=DUMP COMMUNICATE SENT TO MMCP 

S1O@RELATIVE FILE PROBLEMS 

%20=MMCP PAGE FAULT (PARAMETER=SEG DESC ADDR) 

21=GISMO TERMINATE (SEE PARAMETER FOR TYPE 21) 

*22=ENVIRONMENT NOT PRESENT 

%30=INVALID COMPLEX_WAIT COMMUNICATE 

%31=NO ODT QUEUE 

*110#Port, queue, or remote file problem (see parameter 
for type 110). 


RS_M_ PROBLEM PARAMETER RECORD #% FOR SDL 
RS_M_PROB_P2 BIT(24) % FOR MIL 


KKKK TYPE | kerr Logical 1/0 problem. 
1=IRRECOVERABLE EXCEPTION 

2=F 1B NOT OPEN 

foueens POSITION 

NEED NEW AREA 

perneeree CHARACTER ON PSEUDO READER FILE 

=EOF 

Seren OUT OF BOUNDS 

=DISK FILE HEADER INDICATES A MULTI PACK FILE 
Q=AREA NOT PRESENT 

O=LOGICAL 1/0 ALLOWED ONLY FROM SMCP 

1=DISK FILE HEADER NOT PRESENT 

2=INVALID FILE ACCESS 

beyan teGLE RECD SIZE BELOW BOUNDS 

=VARIABLE RECD SIZE ABOVE BOUNDS 

S5=VARIABLE RECD SIZE INVALID ON INPUT 

6=USER DATA OUTSIDE BASE-LIMIT 

=EMULATOR TAPE IRRECOVERABLE EXCEPTION 
%18=EMULATOR TAPE ILLEGAL INITIATE 
%19=EMULATOR TAPE ILLEGAL FETCH 
%20=EMULATOR TAPE OVERLAP 
%21=EMULATOR TAPE ILLEGAL OPCODE 
%22=EMULATOR TAPE ILLEGAL ERROR MASK 
%23="EMULATOR TAPE ILLEGAL ACCESS 
%24=Record size invalid on variable length rewrite. 
%25=Linage page overflow. 
%26=Invalid communicate on printer file. (Linage 
% | communicate error. 
mpc Aas REWRITE ERROR (Rewrite must be preceeded 

y a read. 

S29=EXCEEDED MAXCARDS LIMIT 
%30=EXCEEDED MAXLINES LIMIT 
31=Initiate serial protection. 


BO FO IO IE IE AO POE HE DE AO AO AO gO IO AO dO ae aq 


] 
1 
1 
1 
] 
1 
1 
1 


RkKK Type 10 ##eek Relative file problem. 

kk and relative communicate ** 

%71=Initiate SYSTEM/FILE-INIT to initialise blocks of an 
area. 

%72=Next area required. 

oi pe invalic communicate for file. 

*7/4=End of file/page. 

%75=Boundary violation. 

%76=Invalid key. 
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£7] =Dup!icate key. 
%78=Boundary violation. 
%else as for type 1. 


kekK |S communicate ***k* 
1=Memory buffer needed. 
2=Split fine table. 
riya area needed for data file. 
=Update coarse tables. 
5=Make structure present. 
6=Create current. 
7=|S audit writes. 


BOAO AE AO AE AO AO AO AE AE 


*50=Invalid key on IS start. 

%51=Duplicate key. 

%52=\|nvalid key. 

#53=End of file/page. 

%54=Sequence error.. 

*55=Duplicate key 0k777?72?272272777772772772777277 
spor ncegnl ty error. 


% Fatal errors. 

491=Invalid access mode. 

%92=Read on output only file. 

sop ewc te on non I/0 file. 
S94=Write to non output file. 
%95=Delete on non !/0 file. 
%96=Rewrite not preceeded by read. 
pe alah not preceeded by read. 
%98=|nvalid communicate. 
%99=Irrecoverable write error. 
%100*Sequential read after dynamic invalid key. 


% 
%  kkeK TYPE 2] *keX Gismo Terminate. 
% 1=CWG FROM NON-MCP 
% 2=NON-MMCP CALLED CHECK.IOD 
% 3=COMMUNICATE OUTSIDE BASE/LIMIT 
% 4=INVALID PORT IN DIRECT 10 DESCRIPTOR 
: 5=EXCEEDED DATA OVERLAY DISK SIZE 
% kkk TYPE 22 xkkx Environment not present. 
* USE VALUE FROM COMM SPLITTER MASK CORRESPONDING 
: TO ENVIRONMENT TYPE 
% kkk TYPE 110 xxxx Port, queue or remote problem. 
% l=Invalid key. 
% 2=No end of file provision. 
% Payee of stations declared in FIB exceeded. 
: % 4=No provision for terminate error. 
ND 
END, 
RS_ODT_Q_KEY 


BIT (24) , 
SPOINTS AT THE QUEUE DESCRIPTOR DESCRIBING THE USERS 
*ACCEPT QUEUE 
RS_FILE BIT (8), 
%|1F THE JOB 1S HUNG FOR ANY PROBLEM WITH A FILE, THIS 
SCONTAINS THE INDEX INTO THE FIB DICTIONARY FOR THE 
*FILE IN QUESTION 
*|F THE JOB 1S HUNG FOR NO_DMS_FILE, then the RS_DMS_FILE 
field at the end of rsn (new for 12.0) is used to 
describe which file is needed. Previously, this field 
was used to index into the structure dictionary 


T BIT (16), 
%JOB NUMBER OF THE PARENT OF THIS RUN UNIT (FOR IPC) 
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RS_RUN_UNIT_LINK BIT (16), 

%JOB NUMBER OF THIS JOBS CALLER (FOR |PC) 
RS_|PC_PARAMETER_LIST BIT (24 

ZABSOLUTE ADDRESS OF THE !PC_ PARAMETER_LIST 


RS_EXECUTE TYPE BIT (4), 
% 1 = EXECUTE 
* 2 = COMPILE AND GO 
% 3 = COMPILE FOR SYNTAX 
% 4 = COMPILE TO LIBRARY 
% 5 = COMPILE AND SAVE 
% 6 = GO PART OF COMPILE AND GO 
% = GO PART OF COMPILE AND SAVE 
# 8 = CALLED (IPC) 
RS_NAME NAME_RECORD, 
“NAME OF THIS JOB 
RS_IPC_EVENT BOOLEAN, 
ZDUMMY EVENT FOR ANY HANG FOR IPC 
RS_CANCELED BOOLEAN, 
%A CANCEL COMMUNICATE HAS BEEN ISSUED AGAINST THIS JOB 
RS_EVENT_SPACE BIT (24%17), 


*REPRESENTS THE LIST OF EVENTS ON WHICH A JOB IN THE 
*WAIT_Q |S WAITING 
RS_FREEZE_ BITS RECORD 
RS_BOJ_TO_EOJ_FREEZE BOOLEAN, 
%IF TRUE, JOB WAS EXECUTED WITH FREEZE AND CAN NEVER BE 
ZROLLED OUT 
RS_SORTER_OPEN BOOLEAN, 

ZTRUE IF THIS PROGRAM HAS A READER-SORTER OPEN. THE 

*READER-SORTER MAY OR MAY NOT BE FLOWING. 
RS See ait FREEZE BIT (7) 

*COUNTER THAT IS BUMPED EACH TIME A FREEZE |S DONE AND 
*DECREMENTED FOR EACH UNFREEZE. CHANGED BY FREEZE 
*COMMUNICATE, REMOTE FILE OPEN, INITIALIZER 1/0, MICR 
ZOPEN AND CLOSE 


END, 
RS_LOG_PTR DISK_ADDR, 
%DISK ADDRESS OF WORKING PPB AND FPB-S 
RS_JOB_ACCTING NO BIT (24), 
%A UNIQUE ID NUMBER FOR EACH JOB. RESET ONLY BY 
ZCOLDSTART. INCREMENTED BY 1 EACH TIME A JOB ENTERS THE 
%SCHEDULE. USED BY TABS. 
RS_NUMBER_FILES BIT (8), 
“%MAXIMUM NUMBER OF FPB-S DECLARED BY THIS PROGRAM. 
RS_TYPE HDWR_TYPE, 
%HARDWARE TYPE REQUIRED TO RESOLVE MISSING HARDWARE 
RS_TRACE_FIB 


BIT (8), 

%FILE NUMBER USED FOR TRACE. INDEX INTO THE 
%F1B DICTIONARY 
RS_SER_NO BIT (24) , 

ZSERIAL NUMBER OF A DISK PACK IF THIS JOB IS WAITING 

*FOR A BASE OR CONTINUATION PACK FOR MULTI PACK FILES 
RS_UNIT_INDEX BIT (24) , 

ZADDRESS OF IOAT OF DEVICE INDICATED BY IL,OU,FM,UL 
RS_MCP_USE BOOLEAN 


41F TRUE, MCP 1S WAITING FOR AN EVENT FLAGGED BY 
*RS_BOOLEANS TO OCCUR 
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RS_BOOLEANS RECORD 
*USED BY THE SMCP TO INDICATE ACTIONS AVAILABLE TO 
%SOLVE OPEN AND CLOSE PROBLEMS 


RS_IL BOOLEAN, 
RS_UL BOOLEAN, 
RS_OF BOOLEAN, 
RS_FR BOOLEAN, 
RS” FM BOOLEAN, 
RS_OU BOOLEAN, 
RS_ OK BOOLEAN, 
RS_RM BOOLEAN, 
RS_MR BOOLEAN, 
FILLER BIT (15) 


END, 
RS _ MEMORY PRIORITY T (4), 

~%MEMORY PRIORITY - O- iB ALLOWED 
RS_SWEEPS_BEFORE_DECAY BIT (10), 

~%NUMBER OF MEM SWEEP_ INTERVALS BEFORE IMPORTANT CODE 


SSEGMENTS WILL DECAY 
RS_FORCED SUSPENSION BOOLEAN, 

“%1F TRUE, JOB HAS BEEN STOPPED BY AN "ST EQJ". MESSAGE 
RS_LENGTH BIT (24) , 


*LENGTH IN BITS OF THIS RUN STRUCTURE 
%INCLUDES RS_NUCLEUS, FIB_DICT, 
%IPC_DICT, !PC_PARAMETER_TABLE, 
ZOVERLAY_ DESCRTPTOR 
RS_ PROTECTED BOOLEAN, 
*|F TRUE, JOB IS LOCKED - NEED LP- TO DS 
RS_TO_BE_STOPPED BOOLEAN, 
%1F TRUE, AN ST WAS ISSUED ON THIS JOB. IT IS TO BE 
SSTOPPED WHEN CONVENIENT 


RS_STOPPED BOOL 
%1F TRUE, JOB HAS BEEN STOPPED BY ST 
RS_EMULATOR_TAPE BIT (8), 
%NUMBER OF EMULATOR TAPE FILES CURRENTLY OPEN 
RS_GISMO_PROC_LOCK BOOLEAN 
*FORMERLY RS_PRIVILIGED. NOW IN A RIB. 
RS_APPARITION BOOLEAN, 
%1F TRUE, THIS JOB HAS CALLED ANOTHER JOB VIA SORT OR 
%PGM_ CALLER AND |S WAITING FOR ITS COMPLETION 
FILLER BIT (67), 
ZFORMERLY RJE INFORMATION WHICH NOW RESIDES IN A RIB. 
RS_PRIOR_ 48 NO BIT() 
%J0B NUMBER OF JOB THAT | INVOKED THIS JOB THROUGH 
%PGM CALLER OR SORT 
RS_OVLY_DESC_PTR BIT (2h) , 
%ADDRESS OF RESULT DESCRIPTOR OF OVERLAY DESCRIPTOR 
RS_PSEUDO_READE BIT (24) , 
“ADDRESS OF PSEUDO READER ASSIGNED TO THIS JOB 
BOOLEAN, 


RS DUMMY EV 
= "Sa GENERAL PURPOSE EVENT USED BY COOPERATING PROCESSES 
WITHIN THE SMCP TO HANG A JOB AND CAUSE IT TO BE MOVED 
%TO THE SMCP-S COMM LQUEUE 
RS_MAX_TIME BIT (24), 
% |1F <> 0 THEN PROCESSOR TIME IN 10TH OF SECONDS THAT 
% THIS JOB 1S ALLOWED TO RUN. ONLY APPLIES TO PRIMARY 
% ENVIRONMENT 
RS_1IN_TRANSACTION BOOLEAN, 
%JOB 1S IN DMS TRANSACTION STATE 
RS_DM_OPERATION BOOLEAN, 
SJ0B HAS A DMS OPERATION IN PROCESS - 
%CANNOT BE ROLLED OUT 
FILLER BIT (24), 


a 
9) 


m 


Fe | 
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RS_DMS_GLOBALS T (24), 

%ADDRESS OF DMS ELOBAL. SPACE 
RS_MF1D_CHANGED BIT (2), 

ZMUST SHIFT NAME LEFT ONE NAME BECAUSE OF USERCODE 
RS_PKID_CHANGED BOOLEAN, 

SMUST DELETE THE PACK ID IN THE NAME 


RS_!10_IN_ PROCESS BOOLEAN, 
~SINDICATES INITIALIZER 1/0 1S IN PROCESS 
RS_MCS_FILE NUMBER RECORD 
RS_MCS FL BIT(8) % JUST A TEMP NAME 


*MCS FILE NUMBER FOR COBOL74 PARTICIPATING OUTPUT. 
1S A COBOL 74 PROGRAM DOING DATA COMM 
END, 


RS _TRACE _TO_BE_STOPPED BOOLEAN, 
*ONE MEANS TRACE FILE WILL BE CLOSED NEXT TIME INTERP 
*DOES A WRITE TO THE TRACE FILE 


RS_CHARGE_NUMBER BIT (24), 
“*THIS JOBS CHARGE NUMBER 
RS_pseudo_runner BOOLEAN, 


“% job to be made very transparent- no BOJ, EQJ, etc. 
FILLER Bl 
*FORMERLY RS_RESTRICTIONS. NOW IN A RIB. 


RS_BNA_ZIP BIT (1), 
ZPROGRAM ZIPPED AN "AT" CONTROL CARD COMMAND 
RS_JOB_TASK_MIXNUMBER BIT (16), 

%MIX NUMBER OF THE JOB TASK 
RS_PARENT_TASK_ NUMBER BIT (24), 

%TASK NUMBER OF THE PARENT TASK 
RS_PRIVATE_TASK BOOLEAN, 

ZNO INQUIRIES MAY BE MADE OF THE TASK OR FILE ATTRIBUTES 
RS_TASK_TYPE BIT (4) , 

ZTYPE OF TASK EXECUTION: 1 = ASYNCHRONOUS 

% 2 = SYNCHRONOUS 


% = INDEPENDENT 
% = JOB 
RS_TASK_NUMBER BIT (24), 


ZTASK VARIABLE NUMBER FOR THIS TASK 
RS_OBJECT_NUMBER T (8) , 
~¥OBJECT TASK NUMBER ae INDEPENDENT TASKING ONLY 
RS_TASK_VARIABLE_TABLE_ADDR BIT (24 
a uetane. ZMEMORY ADDRESS OF TABLE OF ALLOCATED TASK VARIABLES 
RS WFL 


BOOLEAN, 
ZINDICATES THIS TASK 1S WITHIN A WFL JOB 
RS_ TASK ea reee DISK_ADDRESS BIT (36), 

DISK ADDRESS OF THIS TASK'S TASK VARIABLE 
RS SUGecONniR: HDR_OFFSET RECORD 
*OFFSET INTO HDR DICT FOR JOBSUMMARY FILE - WFL JOB ONLY 
RS_TASK_SCRATCHPAD BIT (24) 

*MISC USE FOR TASKING 


END, 
RS _ENFORCE MAXCARDS BIT(1), 
%ENFORCE THE LIMIT ON MAXCARDS 

RS_ENFORCE MAXLINES BIT(1), 

ENFORCE THE LIMIT ON MAX INES 
RS_CURRENT CARDS PUNCHED T (24 

*CURRENT COUNT OF NUMBER OF CARDS PUNCHED 
RS_MAXCARDS 


BIT (24), 

*MAXIMUM NUMBER OF CARDS TO PUNCH 
RS_CURRENT LINES PRINTED BIT (24), 

*CURRENT COUNT OF NUMBER OF LINES PRINTED 
RS_MAXLINES BIT (24) , 

%MAXIMUM NUMBER OF LINES TO PRINT 
RS_MAX_ELAPSED_TIME BIT (24), 

*MAXTMUM ELAPSED TIME ALLOWED 
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RS_SCHED_DATE BIT (36), 

%YEAR MONTH DAY HOUR MINUTE SECOND WHEN SCHEDULED 
RS_INVISIBLE BIT(1), 

SINVISIBLE IN MIX 
RS_GO_EVENT BIT(1), 

%SSPECIAL EVENT FOR "st & "GO" 
RS_ST_EOJ_SPECIFIC T (16), 

~% ALLOWS US TO STOP 108. UNTIL EOJ OF A SPECIFIC OTHER JOB. 
RS_DD_SIZE T (24) , 


% NUMBER OF DATA DECKS PRESENT FOR TASK 


RS_DD_ADDR T (2 
% DATA ADDRESS OF THE DATA DECK NAMES 
RS_MASTER_BLOCKED_CNT BIT (6), 
“% number of blocks on the master scheduler for this job 
RS_PORT_EVENT BOOLEAN, 
% HANG EVENT FOR “eMpEtS OPEN". FORMERLY A BIT IN RMSGP 
RS_DMS_TIME BIT (20 
% ACCUM DMS TIME EXCEPT FOR CURRENT ENV. (FOR DMS LOGS) 
RS_DMS_FILE RECORD 
% THIS FIELD REPLACES THE USE OF RS FILE a COMMUN! CATE 
% WHICH DMS RELATED FILE IS THE OBJECT OF A 
% HANG NO FILE (WE DID IT WRONG ANYWAY) ONLY ONE OF 
% THE THREE FIELDS SHOULD BE IN USE AT A TIME 
RS_DMS_ AUDIT _FILE BOOLEAN, 
% THE MISSING FILE IS THE AUDIT FILE 
% (OVERRIDES RS_DMS a ies _FILE) 
RS_DMS DICTIONARY_FILE  BOOLEA 
% THE MISSING FILE IS THE *DICTIONARY 
% (QVERRIDES EITHER OF THE OTHER FIELDS) 
RS_DMS_STRUCTURE_FILE STR_PTR bit 10 in 12.0 


END, 
% (ONLY RELEVANT IF ee TWO FIELDS ARE FALSE) 
RS_LOG_MIX_PPB_OFFSET BIT (16), 
% THE OFFSET OF THE PPB COPY IN THE LOG MIX INFO TABLE. 
% ONLY VALID IF THE LOG OPTION IS SET. 


RS_ORIGINAL_RIB ROUTING INFORMATION ton 
% THE ORIGINAL ROUTING INFORMATION FOR THE J 
RS_CURRENT RIB POINTER ROUTING I NFORMAT! ON_ BLOCK, 
% THE CURRENT ROUTING INFORMATION OF THE JOB. 
RS_SERVER_QUEUVE_ EVENT BOOLEAN; 
~% COMPLEX WAIT EVENT TYPE 10 FOR RIB SERVER QUEUES 


% 
CONSTANT RS_N SIZE =  TYPE_LENGTH(RS_NUCLEUS) ; 
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ENVIRONMENT STRUCTURE NUCLEUS 


The environment structure nucleus (ESN) permits special system code files to be attached to a task. 


The Environment Structure Nucleus as well as the run structure nucleus (RSN) of a program are gener- 
ated by the SMCP at the beginning of a job. The RSN contains pointers to the file dictionary of the 
job and environment dictionary. The ESN contains pointers to the code dictionary and data dictionary 
of the job. 


Neither the RSN nor the ESN is ever rolled out of memory. The RSN is never moved. The ESN is 
contiguous with the local data and is moved during rollout. 


A programmatic description of the ESN follows. 


% 
CONSTANT ES_N_SIZE = 905; 


RECORD 
1 ES_NUCLEUS BIT(ES_N_SIZE), 
2 ES_COMMUNICATE_MSG_PTR BIT 
ZCONTAINS ETTHER AN SDL DESCRIPTOR THAT POINTS TO A 
*COMMUNICATE MESSAGE OR THE MESSAGE ITSELF 


3 ES MSG PARAMETERS BIT (2h), 
4 ES COMM MSG_KEY BIT (8), 
5 ES _ITYPE — BIT (2), 
SDEFINES THE USE OF COMMUNICATE MSG PTR 
% OO = PROGRAM INTERNAL INTERRUPT 
4 O1 = COMMUNICATE 
4 10 = UNDEFINED 
& 11 = TERMINATING 
5 ES _INMBR BIT (6), 
STNTERRUPT NUMBER IF ES_ ITYPE=00 
L ES I|LENGTH BIT (16), 
~%LENGTH OF COMMUNICATE MESSAGE IF ES_1TYPE=01 
3 ES_IADDRESS T (24), 


ZADDRESS OF COMMUNICATE MESSAGE IF ES_ITYPE = 1 
*IF ES_ITYPE = 3 THEN MAY CONTAIN ERROR COUNT OR TYPE 
*SEE 1H FOR DEFINITION WHEN ES_ITYPE = 0 
2 ES_REINSTATE_MSG_PTR BIT (48), 
*SELF=RELATIVE SDL TYPE DESCRIPTOR USED TO PASS THE RESULT 
*OF A COMMUNICATE FROM AN MCP TO AN ENVIRONMENT 
*SEE EACH COMMUNICATE FOR DEFINITION OF VALUES 


3 ES_RMSG_P1 BIT (24) , 
3 ES RMSG P2 BIT (24)., 
ES_RSN_ADDRESS BIT (24), 


pane DRESs OF THE RSN FOR THIS ENV | RONMENT 


ES_MY_BASE BIT (24) , 
SBASE REGISTER FOR THIS ENVIRONMENT 
ES_MY_LIMIT BIT (24), 
ZLIMIT REGISTER FOR THIS ENVIRONMENT 

ES LOCAL DATA_ADDR BIT (24 

ABSOLUTE ADDRESS OF THE LOCAL DATA SPACE FOR THIS 
ZENVIRONMENT. 

ZNOTE: THE LOCAL DATA SPACE MAY NOT COINCIDE WITH THE 
SBASE-LIMIT AREA 


yo NN KN PO 
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2 ES_NIP BIT (32), 
%PAGE, SEGMENT AND DISPLACEMENT OF THE NEXT EXECUTABLE 
%INSTRUCTION FOR THIS ENVIRONMENT 


3 ES_NIP_SG_ PG BIT(12), 
* SDL - (ES _PAGED_DICT By 
4 ES _NIP_SG BIT (6), 
4 ES _NIP_PG BIT (6), 
3 ES NTE SE SEG Spe ES _NIP_SG_PG BIT (10) , 
DL 
3 ES_NIP DSP BIT (20) , 
2 ES_SEG_DIC_PTR BIT (2 


2h 
“ADDRESS OF THE MASTER CODE SEGMENT DICTIONARY FOR THIS 
*ENVI RONMENT 


2 ES_DATA_DIC_ADDR BIT (24), 
ADDRESS OF THE DATA SEGMENT DICTIONARY 
2 ES_SPAD_PTR BIT (24), 


SADDRESS OF SCRATCH PAD IN S-MEMORY 

2 ES_INTERP_ID B ’ 
*INTERPRETER NUMBER FOR THIS ENVIRONMENT 
*INDEX INTO THE INTERPRETER DICTIONARY 


2 ES _BOOLEANS BIT (23), 
3 ES_CONTROL_STATE_BITS BIT (2 
% THESE TWO-MUST REMAIN IN THIS ORDER FOR GISMO'S BENEFIT 
Lh ES _MCP_BIT BOOLEAN, 
SINDICATES TO THE INTERPRETER THAT THIS IS THE SMCP 
L ES _CONTROL_STATE BOOLEAN, 


~SINDICATES ‘ THE INTERPRETER THAT THIS ENVIRONMENT 
*BELONGS TO A CONTROL STATE JOB 
3 ES_MEDIA BOOLEAN, 
% IF SET, THEN THE LOCAL DATA AREA 1S PRESENT, 
% OTHERWISE IT 1S ROLLED OUT au DISK 


ES_LINKS BOOLEAN 
SIF TRUE, DYNAMIC SPACE CONTAINS MEMORY LINKS 
3 ES_SIZECHANGE BOOLEAN, 


41F TRUE, THE SCRATCHPAD FOR THIS ENVIRONMENT 1S 
SBEING CHANGED 


3 ES_SD_ PTR_FLAG BOOLEAN 
% O = ES SEG _DIC_PTR CONTAINS ADDRESS OF DICTIONARY 
% CONTAINER — 
* 1 = ES SEG _DIC_PTR CONTAINS ADDRESS OF SEGMENT 
% DICTIONARY ITSELF 

3 ES_INTRIN_AGGR_USED BIT (2), 
% SAME AS PROG_INTRIN _ AGGREGATE IN THE PPB 

3 ES_DONT_REENTER BOOLEAN, 
%1F TRUE, THIS ENVIRONMENT CANNOT SHARE ITS SEGMENT 
%D1CTIONARY 

3 ES_PAGED DICT BOOLEAN, 
ZINDICATES THAT CODE SEGMENT DICTIONARY 1S PAGED 

3 FILLER BIT (12), 
% FOR EASY ADDITION OF FLAGS 

2 ES_ PAGED ARRAY_OVERLAY BIT (6), 


SSEGMENT NUMBER OF THE SDL PAGED ARRAY HANDLER OVERLAY 
#1F REQUIRED FOR THIS ENVIRONMENT - ALWAYS PAGE O 
2 ES_LAST_ENVI RONMENT BIT (16), 
SNUMBER OF THE ENVIRONMENT THAT CALLED THIS ONE 
*USED BY THE EX!IT_ENVIRONMENT COMMUNICATE 
2 ES_SPAD_ SIZE BIT (16), 
%SIZE IN BITS OF SCRATCH PAD FOR THE M-MACHINE. 
*FOR B1700/B1800 IT WILL BE 768 
2 ES_INTERP_DATA_S1ZE BIT (24), 
*LENGTH IN BITS OF INTERPRETER DATA SPACE 


1152055 D-33 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
Memory Organization 


2 ES_INTERP_DATA_ADDR BIT (24), 
%ABSOLUTE ADDRESS OF INTERPRETER DATA SPACE 
2 ES_LOCAL DATA SIZE BIT (24) , 
ZCENGTH IN BITS OF THE LOCAL DATA SPACE FOR THIS 
%ENVI RONMENT 
2 ES_TRACE BITS BIT (8), 
ZFLAGS INDICATING WHAT TYPE OF TRACE IS TO BE PERFORMED 
%THE TRACE BUFFER 1S GLOBAL TO THE PROCESS, BUT THE TRACE 
SBITS ARE LOCAL TO EACH ENVIRONMENT. 
SINITIALLY IT WILL ONLY BE POSSIBLE TO SPECIFY TRACE 
*BITS FOR THE PRIMARY ENVIRONMENT, EXCEPT VIA MODIFY 
% ON THE CODE FILE, OR PROGRAMMATICALLY 
FILLER BIT (44). 
ES DATA DIC SIZE BIT (16), 
aiteer OF DATA DICTIONARY ENTRIES 
2 ES PROG P DISK ADDR, 
SDI Sk ADDRESS OF THE CODE FILE FOR THIS ENVIRONMENT 
%MAY BE ZERO FOR SPECIAL ENVIRONMENTS SUCH AS IBASIC 
2 £S_DISK DISK ADDR, 
SROLL OUR DISK ADDRESS FOR THE LOCAL DATA 
2 ES_LENGTH BIT (24), 


%LENGTH IN BITS OF THIS ENVIRONMENT 
%INCLUDES LOCAL DATA, ES_NUCLEUS, DATA_DICT, 
%SCRATCH_PAD 

2 FILLER BIT (40) , 

2 ES_DATA_OVERLAYS BIT (2 
ZADDRESS OF DYNAMIC SPACE WITHIN LOCAL DATA SPACE 
%FIRST LINK FOR MEMORY MGMT OF DATA OVERLAYS 

2 £S_LAST_LINK BIT (24), 
SADDRESS OF LAST MEMORY LINK WITHIN DYNAMIC SPACE 
%USED FOR MEMORY MGMT 

2 ES_LAST_OVLY BIT (24) , 
SLEFT OFF POINTER FOR MEMORY MGMT - USED ONLY FOR 
ZENVIRONMENTS WITH DATA OVERLAYS AND LINKS 


KO PO 


2 ES_OVLY_DISK_BASE DISK ADDR, 
%DISK ADDRESS OF BEGINNING OF DATA OVERLAY SPACE 
2 ES_OVLY_DISK_PTR BIT (24 
ZINDEX INTO THE DATA OVERLAY AREA ON DISK 
2 ES_OVLY DISK SIZE BIT (24) , 
%NUMBER OF DISK SEGMENTS RESERVED FOR DATA OVERLAYS 
2 ES_PREVENT_MOVE BOOLEAN, 


% |F TRUE, THIS ESN MAY NOT BE MOVED. 

&% THERE ARE CURRENTLY NO CONDITIONS UNDER WHICH THIS 

% WILL BE SET. IT 1S PURELY A 'FUTURES' FIELD. 
2 ES DISPLACED BIT (24) , 

SDISTANCE THE ESN HAS BEEN MOVED AS A RESULT OF ROLLOUT 
2 £S_EMULATOR_BITS BIT (4), 

ZUSED BY THE B1700 EMULATOR 
2 ES_ENVIRONMENT_ TYPE BIT (4), 

% O = PRIMARY ENVIRONMENT (THE USER PROGRAM) - 1 ONLY 

% 1 = MCP ENVIRONMENT - FUTURE? 

% 2 = DMS ENVIRONMENT - CURRENTLY 1 ONLY 

% 3 = SPECIAL ENVIRONMENT ~ CURRENTLY 1 ONLY, FOR IBASIC 
2 ES_TEMP_PPB PTR DISK ADDR, 

% DISK ADDRESS OF THE WORKING PPB FOR THIS ENVIRONMENT. 

% WILL BE THE SAME AS RSN.RS_LOG_PTR FOR THE PRIMARY 

% ENVIRONMENT. 
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2 ES_INTERFACE_ADDR BIT (24), 
% RELADDRESS OF DMS INTERFACE AREA WITHIN DMCP'S LOCAL 
% DATA. ALSO USED AS AN ABSOLUTE ADDRESS OF TEMP INTERFACE 
# DURING OPEN, BEFORE DMS ENV |S ALLOCATED OR BEFORE 
% ES CONTROL_ STATE 1S SET -- WAS RS_DMS_INTERFACE_ADDR. 
2 E£S_FATALERROR BOOLEAN, 
% INDICATES DMCP HAS A FATAL OR DEBUG ERROR -- 
% WAS DI_FATALERROR. 
2 ES_NON_FATALERROR BOOLEAN, 
~% DMCP HAS A NON-FATAL ERROR 
2 ES_RESOURCE COUNT BIT (16) ; 
% NUMBER OF RESOURCES DMCP HAS LOCKED. IF 0, PROGRAM CAN 
* BE DS'ED IMMEDIATELY, OTHERWISE RS_ABORT MUST BE SET -- 
% WAS DI_DONT_DS_ME. 
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APPENDIX E 
MEMORY MANAGEMENT 


Figure E-1 shows global memory allocation and figure E-2 shows linked memory allocation. The 
paragraphs that follow the figures provide (1) a description of the fence within linked memory and 
(2) a discussion of the manner in which the SMCP program attempts to minimize memory checker- 
boarding. 


Programmatic descriptions of a system descriptor (used in code and data dictionaries) and of a memory 
link (describes a memory segment) complete the appendix. 
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Maximum 
Address 
GISMO work area 
interrupt queue 
GISMO code 
Micro MCP data space 
MCP run structure nucleus 
MCP environment structure nucleus 
Upper terminating memory link 
l 
I 
| 
| 
1 
I 
l 
l 
Linked 
I Memory 
t 
t 
{ 
I 
| 


Memory Link | 


Lower Terminating Memory Link 


MCP code segment 1,0 


Correctable error table 


Cold start variables 


Interpreter dictionary 


MCP page zero dictionary 


MCP code dictionary master 


MCP stacks, includes 
MCP global data, also known as Hints 


Address Zero 


Figure E-1. Global Memory Allocation 
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Upper Terminating Memory Link 


SDL2 interpreter global segment 


Input/output assignment table 
Unit test descriptors 
Tape descriptor chain head 


Communicate splitter mask and Truth table 


Micro MCP segment dictionary 


SDL2 interpreter segment dictionary 


Extended result ‘descriptors 


Queue information global parameters 


Queue descriptors 


SMCS segment dictionary 


Network controller segment dictionary 


Disk cartridge/pack information table 


Disk file header dictionary 


| 
| 
| | 
| | 
| 
| | 
| 
| | 
| | 


Lower Terminating Memory Link 


Figure E-2. Typical Linked Memory Allocation 
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THE FENCE 


Within linked memory, the location called the fence is used to guarantee that there is always room 
in memory for the largest SMCP code segment and segment dictionary for that page. If the SMCP 
program were performing an operation and did not have room to bring in a required code segment 
and the segment dictionary, the system would have to halt. 


Simply using the largest SMCP code segment is not good enough because a shorter SMCP code seg- 
ment could have a longer dictionary; thus the combination of the two could be longer. 


To calculate the location of the fence, add the bit length of the largest MCP code segment for its page, 
the bit length of the segment dictionary for its page, and the bit length of three memory links to the 
memory address of the lower terminating memory link. 


MINIMIZATION OF CHECKERBOARDING 


Checkerboarding, also known as “external fragmentation,” is a condition in which the disk contains 
many permanently allocated save areas separated by small overlayable areas. In such a situation, there 
may be no contiguous overlayable area large enough to service a given request, even though the small 
areas aggregate to more total area than is needed. This situation has a serious impact upon system 
performance. 


To minimize checkerboarding, the SMCP program allocates non-overlayable, or “save,” memory seg- 
ments at the high end of linked memory. Examples of such segments are program run structures, user 
files, and disk file headers. 


SEGMENT DICTIONARIES AND SYSTEM DESCRIPTORS 


Virtual memory is supported by allowing process segmentation. By segmenting code, data, and interpre- 
ters and dynamically moving a segment into or out of memory as required, the system functions as 
though it has almost infinite memory capacity. The MCP manages this facility through three structures: 
Code segment dictionaries, data segment dictionaries, and interpreter segment dictionaries. Each dic- 
tionary consists of a string of system descriptors, each of which describes one segment, including its 
length, location, and status. As a segment is moved in or out of memory, its dictionary entry is up- 
dated accordingly. 


At run time the MCP creates the code and data segment dictionaries from information in the 
program ’s code file. The interpreter segment dictionary is created from the interpreter code file in the 
same manner and is referenced by an entry in the interpreter dictionary, a structure fixed in memory 
at CLEAR/START time. The run structure of the program contains pointers to the code and data 
segment dictionaries and an index into the interpreter dictionary. 


A programmatic description follows. 
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RECORD 
01 SYSTEM _DESCR 
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SY_TN_USE 
SY_STATUS 
03-SY_MEDIA 

03 SYTLOCK 

03 SY_IN PROCESS 


SY_INITIAL 


SY_FILE 


SY_DK_FACTOR 
SY"SEG PG 
SY_TYPE 


SY_ADDRESS 
03 FILLER 
03 SY CORE 
SY_LENGTH 


Memory Management 


BIT(SY_SIZE 
BOOLEAN, 


BOOLEAN, 
BOOLEAN, 


BOOLEAN, 


BOOLEAN, 


), 
4 
% 
% 
% 
% 
% 
% 
% 
% 
% 
% 
% 
% 
% 
% 
% 
BIT (3), 4 
BN? % 
BIT (4), % 
% 
4 
% 
% 
4 
% 
% 
4 
% 
% 
% 
% 
% 
% 
% 
% 
% 


TO HELP MEMORY MANAGEMENT 
O=DISK, 1=S-MEMORY 


TRUE IF THERE IS AN 1/0 IN 
PROCESS FOR THE INFORMATION 
REPRESENTED BY THIS DESCRIPTO 
IF TRUE, "SY.CORE'" CONTAINS A 
POINTER TO THE 1/0 DESCRIPTOR 
"ADDRESS" 1S READ-ONLY MOTHER 
COPY, HENCE IF "WRITE" THEN 
GET NEW DISK AND REPLACE AD- 
DRESS. THE OBJECT OF THIS 
DESCRIPTOR IS A FILE WHOSE 
USERCOUNT MUST BE DECRENENTED 
WHEN THIS DESCRIPTOR IS 
RETIRED. 

MEMORY DECAY FACTOR 

MCP MEMORY ACTIVITY AUDITING 
UNITS FOR SY.LENGTH. 

BITS 

DIGITS (4 BIT) 

CHARACTERS (8 BIT) 

NORMAL DESCRIPTORS 

DISK SEGMENTS 

SYSTEM DESCRIPTORS 

SYSTEM INTRINSIC 

INDIRECT REFERENCE 
ADDRESS GIVES RELATIVE 
DISPLACEMENT IN BITS 
(SIGNED NUMBER) . 

8 = MICROS 


PORT,CHANNEL AND UNIT. 

CORE, OR ADDRESS WITHIN UNIT. 
NUMBER OF UNITS, AS 
DETERMINED BY SY.TYPE. 


“MIO Fw bh = © 
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MEMORY LINKS 


The SMCP program organizes and allocates space in memory through the use of fields known as mem- 
ory links. Each link immediately precedes the block of memory it describes. The link contains such 
information as the disk address from which the memory was loaded, a pointer to the dictionary entry 
for the memory segment, the number of the job using the segment, the type of use of the segment, 
whether or not the segment can be overlaid, and pointers to the preceding and following memory links. 


The following describes some of the different things that can happen to a memory segment beginning 
with the time before it is allocated and ending with the time it is deallocated: 


Initially, the memory segment is available. 

It is allocated. 

It is swept by the GISMO firmware if the MPRI system option is set. 
It is passed over for overlay. 

It is overlaid (reallocated). 

It is deallocated and becomes available again. 


A programmatic description of a memory link follows. 


CONSTANT MEMORY_LINK_SIZE = 185; 


RECORD 
1 MEMORY_LINK BIT (MEMORY_LINK_SIZE), 
2 ML_DISK BiSkK_ADDR, % FROM SY_ADDRESS FIELD 
2 ML GROUP BIT (G7), 
3 ML_POINTER ADDRESS, % OF DICTIONARY ENTRY 
3 ML JOB NUMBER BIT) % OF JOB USING SEGMENT 
3 ML_TYPE BIT(6), % OF MEMORY SEGMENT 
3 ML SAVE BOOLEAN, % TRUE IF NOT OVERLAYABLE 
2 ML_STZE BIT(24), % SEGMENT SIZE IN BITS 
2 ML PRIORITY FIELD BIT (28) , 
3 ML DK INTERVAL BIT ey 
3 ML_CURRENT DK_INT BIT(10), 
3 ML_INCOMING PRIORITY BIT (4), 
3 ML_RESIDENCE PRIORITY  BIT(4), 
2 ML_FRONT ADDRESS,  % OF FOLLOWING LINK 
2 ML_BACK ADDRESS, % OF PRECEDING LINK 
2 ML USAGE BITS BIT (2), 


3 ML_PREVIOUS_SCAN_TOUCH BOOLEAN, 
3 ML_CURRENT_SCAN_TOUCH BOOLEAN; 
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MEMORY LINK TYPES 


SET ML_TYPE_SET MEMBER (6) = 
CODE 


DATA 
AVAILABLE 
RN_S 


MCP_TEMP 

USER FILE 

SEG DICTV 
MICROCODE 

DICT MASTER 

QUEUE _DIRECTORY_TYPE 
MSG_BUFFERV 
MESSAGE_LIST_TYPE 
|_S BUFFER 
DATA_SEG 

DMS BUFFER 
TERMINATING LINK 
MCP_PERM 

PSR_MEM 

MCP” OAT 

DISK HEADER 
PACKMEM 

SD_CNTNR 

SCHED_MEM 

SORT MEM 

DCH MEM 

MI CROCODE_NON_OVERLAYABLE 
QUEUE_AVL—BUF_V 
DMS _DTSK_HDR ~ 

DMS STRUCTURE 

DMS TEMP 
DMS_GLOBALS 
DMS~LOCK_DESCR 
ROUTING TNFO BLOCK 
PERM_ODT_BUFF 
DMS_WORKAREA 

|_S~ CURRENT 
INTERP_DATA 
LOG_MIX TABLE 
|_S~STRUCTURE 
RUN~UNIT 

TASK VARIABLE _TABLE 
SYSTEM_ERROR_TABLE 


% 
CONSTANT MAX_ML_TYPE = 41 
CAN_TT_GO_BELOW_ FENCE = [CODE, DATA, AVAILABLE, 


rnrnenk enn hen ke onan an nnt aeat rn aaa 
NO 
fo) 


ee 
a 
—~O 
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APPENDIX F 
INPUT/OUTPUT OPERATIONS 


The data structures the MCP uses to keep track of input/output operations are described in the first 
four parts of this appendix. The ways in which various input/output functions are performed are de- 
scribed in the last part. 


INPUT/OUTPUT ASSIGNMENT TABLE 


The MCP monitors the status of all peripheral devices that are attached to the system. To do this, 
it maintains information about the status of each device. The major portion of this information is kept 
in the input/output assignment table (IOAT). 


The IOAT allows the MCP to keep track of all peripheral units except the ODT and the various data 
communication devices. Each unit is identified by port, channel, and unit number as well as by a sym- 


bolic name. Various fields reflect the status of the unit; for example, AVAILABLE, SAVED, RE- 
WINDING, LOCKED. 


Following is a programmatic description of the IOAT. 


ee IOAT_SIZE AS #528#; 


RECORD 1 IOAT_REC BIT(IOAT_SIZE), 
O02  UNIT_TNITIAL BIT (66) % 
03 ~UNIT_HDWR BIT (6), 
03 UNIT~PCD BIT (12), % 
O4 UNIT~PORT_CHANNEL BIT (7), % 
05 UNTT_PORT BIT 3» % 
O5 UNIT CHANNEL BIT (L), % 
O4 FILLER BOOLEAN, % 
OL UNIT_UNIT BIT (4), % 
03 UNIT NAME CHAR (6), 
02  UNIT_LABET_ADDRESS DSK_ADR, 
03 ~FILLER BIT (12), 
03 UNIT_PACK_INFO ADDRESS, 
02  UNIT_RS ADDRESS,% USER LIMIT REGISTER 
O02 UNIT FLAGS BIT (36) , 
03  ~UNIT_AVAILABLE BOOLEAN, 
03 UNITTAVAILABLE_ INPUT BOOLEAN, 
03  UNITTAVAILABLE~OUTPUT BOOLEAN, 
03 UNIT WAIT_FOR_NOT_READY BOOLEAN, 
03 UNIT TEST~AND_WAIT BOOLEAN, 
03 UNIT SAVED BOOLEAN, 
03 UNIT REWINDING BOOLEAN, 
03 UNIT EOF SENSED BOOLEAN, 
03 UNIT LOCKED BOOLEAN, 
03 UNIT LABEL_SENSED BOOLEAN, 
03 UNIT LABEL_SENSED BOOLEAN, 
03. UNIT PRINT —BACKUP BOOLEAN, 
03 UNIT PURGE BOOLEAN, 
03  UNITZLOCK_AT_TERM BOOLEAN, 
03  UNIT~TO_BE_SAVED BOOLEAN, 
03 UNITZFLUSH BOOLEAN,% FLUSH TO EOF 
03 UNIT TAPEF BOOLEAN, 
03 UNIT DISKF BOOLEAN, 
03 UNITZSTOPPED BOOLEAN, 
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03 UNIT TRANSLATE BOOLEAN, 
03 UNITTCTRL CARD_USING BOOLEAN, % 
03  UNITTREMOTE JOB BOOLEAN, 
03  UNITTCLOSED BOOLEAN, % 
03 UNITTCLEARED BOOLEAN, 
03  UNITTMULTI FILE BOOLEAN, % 
03  UNITTEOT BOOLEAN 
03  UNITTTAPE_FILE_STATUS BIT (3), : O = NOT RELEVANT (ANS!) 
1 = BOV(BEG OF VOLUME 
: 2 = BOF (BEG OF FILE) 
% 3 = EOV(END OF VOLUME) 
% I, = EOF (END OF FILE) 
% 5 = PFB(PROCESS FILE 
% BLOCK) 
% 7 = UNDEFINED 
03 UNIT_TAPE_XCH BOOLEAN,% FOR MIS-MATCHED UNITS 
03 UNITINO TRANS TBLE BOOLEAN, $PC-5 
03  UNITIOFFLINE YET_IN_USE BOOLEAN, SFOR ASSIGNED UNITS 
03  UNITTAUDIT BOOLEAN, % DMS AUDIT TAPE 
03  UNITTRESERVED_BY_AB BOOLEAN,% AUTO BACKUP 6.1 
03  UNITTLABEL_OP™ BIT (3), : O=@OOEOOXS ODD TRANS 
1=@00COOX@ ODD NO TRANS 
: 2=@00600X@ EVEN TRANS 
% 3=@00400X@ EVEN NO TRANS 
UNIT DRIVE TYPE BIT (4) .% DISK ONLY 
—% VALUE DCC1/2/3 DPC1/2. DFCI DFC3 
% 6 32X20 N/A N/A N/A 
¥ | 2X40 215 SYS.MEM 5N 
% 9 4X20 225 N/ 7A 
% 3 64X40 N/A IC N/A 
% N/A 207.—s«C- N/A 
% C5 N/A 206 ~—sdTA- N/A 
g 6 N/A 1 nr N/A 
% 7 N/ N/A N/A 
03 UNIT PRINTER TYPE BIT (4) , 
%- ¢ 450-700 LINE PER MINUTE PRINTER. 
% | 1100 ~=LINE PER MINUTE PRINTER. 
¥ 9 NOT USED. 
% 1500 ~LINE PER MINUTE PRINTER. 
% -15 NOT USED. 
UNIT_STATUS BIT (15), 
UNIT_TO BE _POWERED_OFF BOOLEAN, 
UNIT PC TRAIN BOOLEAN, 
FILLER BIT (6) , 
UNIT JOB NUMBER BIT (16) , 
UNIT7FIB™ADDRESS ADDRESS, 
UNITZLABEL_ TYPE BIT (2); 
% 0 = OMITTED 
% 1 = BURROUGHS 
% 2 = USASI 
% 3 = INSTALLATION 
UNIT_TRANS. TBLE_ 1D BIT(8), %PC-5 TRAIN ID 
UNITTSAVED~FOR_ JOB BIT (16), 
IDENTIFIES WHO THIS DEVICE 1S SAVED FOR 
FILLER WORD,% PLEASE DO NOT DISTURB 
UNIT_TEST_DESC BIT (DESCRIPTOR SIZE) ; 
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CHANNEL TABLE 


Another structure associated with peripheral management is the channel table, .a structure for passing 
information between GISMO and the MCP. There is one channel table for each port. Each element 
of a channel table describes one channel of the port. 


The channel table reflects the status of a particular channel. Certain information passed to GISMO 
during a dispatch operation is used by soft I/O to manage the execution of that operation. Before 
GISMO passes control back to the MCP, certain fields that direct the course of action the MCP will 
take are updated. 


Following is a programmatic description of the channel table. 


RECORD 
O} CHANNEL TABLE BIT (48) , 
02 BUSY BIT( 1), SET WHEN CONTROL IS BUSY. 
O2 PENDING BIT( 1),@ SET ON RECEIPT OF DISPATCH OPERATION. 
O2 EXCEPTION_IDLE BIT( 1), SET IF EXCEPTION OCCURS AND 
LINK_ON_EXCEPTION FALSE. 
INHIBITS DISPATCHES. 
RESET BY DISPATCH WITH OVERRIDE SET. 
02 TIMER_DISPATCH BIT( 1),% SET BY MCP DURING CLEAR/START. 


IMPLEMENTS TEST AND WAIT OPERATIONS 
ON TAPE AND DISK CONTROLS. 

CAUSES GISMO TO INITIATE THE CHANNEL 
AT EACH TIMER INTERRUPT IF THE 
CHANNEL IS NOT BUSY. 

SET BY MCP TO CLEAR TEST & WAIT ON 
ODT OR DATACOMM, TO CLEAR A HUNG CON- 
TROL OR TO PROCEED AFTER AN EXCEP- 
TION. IF SET AT DISPATCH, 

CAUSES GISMO TO RESET BUSY, PENDING, 
EXCEPTION_IDLE AND EXCEPTION _OVER- 
RIDE, AND THEN TO PROCEED WITH NORMAL 
DISPATCH. 


O02 EXCEPTION_OVERRIDE BIT( 1), 


O02 EXCHANGE BIT( 1),% SET BY MCP DURING CLEAR/START. 
}MPLIES CHANNEL IS ON AN EXCHANGE. 

O02 OLD_MODE att I} NOT USED 

O02 INTEGRITY BIT »@ SET TO INDICATE CHANNEL TABLE ENTRY 
INITIALIZED CORRECTLY. 

O2 LINK_ON_EXCEPTION BIT( 1),% SET BY MCP DURING CLEAR/START 


FOR TAPE AND DISK ONLY. 
CAUSES GISMO TO KEEP LINKING THRU 

THE DESCRIPTOR CHAIN IF AN EXCEPTION 
OCCURS RATHER THAN SETTING THE 
EXCEPTION IDLE BIT TO INHIBIT FURTHER 
DISPATCHES. 

»% 1F SET AND EXCEPTION HAD OCCURRED 
OVERRIDE EXCEPTION AND PROCEED WITH 
DISPATCH. 

IF RESET AND EXCEPTION HAD OCCURRED 
SR Ca DISPATCH AND RETURN ERROR 
TO CALLER. 

NOT USED PRESENTLY 


02 ODT_DISPATCH_OVERRIDE BIT(1 
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02 DISK_DEVICE 
O02 FILLER 
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O02 TYPE 


02 LAST 
02 EXCHANGE PC 
03 EXCHANGE P 
03 EXCHANGE _C 
02 REF_ADDR 
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EVICE TYPE, ONLY FOR DUMP ANALYSIS 
= SERIAL DEVICE 

= DISK 

= TAPE 

CASSETTE 

FLEXIDISK 

5 = DATACOMM 

DELIMITS CHANNEL TABLE 

EXCHANGE PORT AND CHANNEL 

EXCHANGE PORT 

EXCHANGE CHANNEL 

ADDRESS OF DESCRIPTOR IN PROCESS 
EXCEPT FOR TAPE AND DISK CHANNELS 
WHERE !T |S ADDRESS OF HEAD OF CHAIN. 


Fwy —-og 
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INPUT/OUTPUT DESCRIPTOR 


The following is a programmatic description of an input/output (I/O) descriptor as seen in the disk 
descriptor chain and the tape descriptor chain. 


RECORD 
01 10 DESCRIPTOR BIT (272) 
O02 ACTUAL_END M_ADDR, 4 POINTS TO END MEMORY ADDRESS WHEN OP 
% COMPLETE. 
02 RESULT Ee eay" 
03 BIT_O_1 BIT( 2),% 00 = READY TO DISPATCH FROM MCP TO GISMO 
% O1 = INITIATED FROM GISMO TO !/0 CONTROL 
% 10 = OP COMPLETE, NO EXCEPTION 
% 11 = OP COMPLETE, EXCEPTION 
% DEFINITION OF THE REMAINING 22 BITS VARIES 
% DEPENDING ON WHETHER THE OP 1S COMPLETE. 
% THE FOLLOWING DEFINITIONS APPLY WHEN 
% THE OP 1S NOT COMPLETE 
03 FILLER BIT( 1), 
03 BIT_3 BIT( 1),% RSF.INIT 
% |F BIT_O_1 = 0 AND BIT_3 = 1 AND BIT_6 = 1 
THE 10 DESCRIPTOR HAS BEEN INITIATED 
THE UNTT IS SEEKING 
03 FILLER Bit 2). 
03 BIT_6 BIT( 1),% RSF.DISK.DEVICE 
O02 LINK M ADDR, % POINTS TO FOLLOWING DESCRIPTOR 
02 10 OP a 
03 OP BIT( 3),% O00Ox = READ 
% 010x = WRITE 
% ETC 
03 FILLER Be 
03 UNIT BIT( 4),% UNIT NUMBER 
02 BEGIN M_ADDR, % BEGINNING MEMORY ADDRESS FOR DATA TRANSFER 
02 END M_ADDR, % ENDING MEMORY ADDRESS FOR DATA TRANSFER 
O02 DISK BTT (24) ,% BEGINNING DISK ADDRESS FOR DATA TRANSFER 
O02 M_EVENTS tr 8), 
03 10C BIT( 1), % HARD !/0 COMPLETE, PHYSICALLY 
03 SIOC at 1), % SOFT 1/0 COMPLETE, LOGICALLY 
03 FILLER BIT( 1), 
03 INT_P_OR_S BIT( 1), % IF ON, CAUSE WAITING PROGRAM WHEN 10C 
% iF OFF, QUEUE SMCP INTERRUPT WHEN 10C 
03 S_INT_SENT BIT( 1), % SMCP INTERRUPT QUEUED 
03 M_INT SENT abt 1), % NOT USED 
03 FILLER BIT( 1), 
03 INT S ane 1), % QUEUE SMCP INTERRUPT WHEN 10C 
02 MCP_I0 BIT(16), % CALLED 1/0 TYPE IN DUMP. 
02 FIB M_ADDR, % ADDRESS OF FIB ASSOCIATED WITH THIS 1/0 
02 FIB LINK M_ADDR, % USED TO LINK MULTIPLE BUFFER FIBS 
O02 BACK_LINK M ADDR, % POINTS TO PREVIOUS DESCRIPTOR 
02 PORT CHANNEL BIT( 7), 
03 PORT BIT ; , * PORT TO WHICH OPERATION IS SENT 
03 CHANNEL BIT , % abit: TO WHICH OPERATION IS SENT 
O02 BEEN THRU_ERROR BIT( 1); % SMCP HAS ALREADY HANDLED EXCEPTION 


1152055 F-5 


B 1000 Systems Memory Dump Analysis 
Functional Description Manual 
Input/Output Operations 


RESULT DESCRIPTORS 


The following are programmatic descriptions of non-test operation result descriptors for tape and disk 
devices. 


RECORD 

O1 TAPE RESULT 
O2 COMPLETE 
O2 EXCEPTION 
02 NOT_READY 
O02 PARTTY 
O2 MEM_ACCESS 
O02 MEM_PARITY 
02 EOT 
02 BOT 
O02 WRITE_LOCK 

EO F 

O02 REWIND 

02 BLANK_TAPE 

O2 CRC 

O2 FILLER 


RECORD 

O1 DISK RESULT 
02 COMPLETE 
02 EXCEPTION 
02 NOT READY 
02 DATA PARITY 
02 FILLER 
02 MEMORY PARITY 
02 WRITE LOCKOUT 
O02 FILLER 
02 ADDRESS PARITY 
02 SECTOR_ADDRESS 
02 SEEK TIMEOUT 
02 FILLER 
02 TRANSMISSION 
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INPUT/OUTPUT FUNCTIONS 


Normal state programs request I/O functions in a symbolic fashion; for example, Write a Record. The 
MCP must transform these expressions into explicit I/O operators called I/O descriptors. An I/O de- 
scriptor allows the MCP to communicate directly with a peripheral device by means of the soft I/O 
routines of GISMO. GISMO manages the execution, by the I/O subsystem, of these operators. 


ALL I/O descriptors include fields providing such information as the type of I/O operation requested, 
source or destination memory addresses, and the device that is to execute the operators, as well as a 
field for result information used when control is returned to the MCP. Certain types of I/O descriptors 
also contain fields for information unique to their specific functions. 


Any number of I/O descriptors may be linked together to form a single chain, dispatched in one MCP 
operation to minimize the interaction of the MCP with the I/O subsystem. 


The multiline control is the only B 1000 device control that has a direct connection with main memory. 
For all other controls, all data transfers between the control and memory must go through the proces- 
sor. GISMO contains a set of microcoded routines with the primary function of interfacing between 
the MCPs (MMCP, SMCP) and the hardware. This allows the MCPs to view the I/O subsystem as 
an I/O processor. The MCPs can initiate I/O descriptors; GISMO handles initiation of the control, 
data transfer, and termination. The MCPs can queue several descriptors for execution by a control 
by properly setting the link fields in the descriptors; GISMO initiates each one in turn. 


User programs make requests to the MMCP. Sometimes, the MMCP must ask that the request be han- 
dled by the SMCP. In either case, the request is passed to GISMO, which, in turn, passes it to the 
I/O control. 


The I/O subsystem has the capacity for handling up to 15 controls (channels). GISMO initiates an I/O 
operation on a channel but does not wait for the operation to complete. It returns control to the re- 
questing channel. Consequently, more than one I/O operation may be in process at any given time. 
However, GISMO addresses only one channel at a time. 


The primary communication between the MCPs and GISMO is through the I/O descriptors. The 
SMCP dispatches I/O operations to GISMO using the DISPATCH S-operator. (The MMCP contains 
microcode to perform a similar function.) This S-operator requires two parameters, the port and chan- 
nel of the device being addressed and the memory address of the descriptor. The I/O descriptor con- 
tains all of the information needed by GISMO for the operation. 


An I/O descriptor is usually located by its Reference Address, which is the memory address of the 
result descriptor field of the I/O descriptor. (The result descriptor field is often referred to as the Re- 
sult Status (RS) field.) All the descriptors associated with a given control are linked together in memory 
by setting the LINK field in one descriptor to the memory address of the RS field of the next descrip- 
tor. The descriptors are also linked in the reverse direction through the BACK__LINK field. This 
facilitates the adding and deleting of descriptors. A LINK field may not be zero but it may hold the 
memory address of the descriptor it is in. 


Each RS field is 24 bits in length, and the bits have different meanings at different times. When the 
descriptor is ready for initiation, the RS field is formatted as shown in table F-1. 
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Table F-1. Result Status Field 


RS Field 
Bits 0-1 RS Status Bits 
00 — Ready to be executed 
01 — I/O currently in process 
10 — I/O complete with no exception 
11 — I/O complete with exception 
Bits 2-11 Gismo Toggles 


MCPs may not alter any bits in this field if 
RS Status = Ol. 


Bits 12-14 Port to which this I/O is directed. (Not used) 
Bit 15 Interrupt requested on [/O Completion. 


Bit 16 High-Priority interrupt requested on I/O 
Completion. 


Bits 17-19 Port to which interrupts are to be sent upon 
I/O Completion. (Usually processor 0.) 


Bits 20-23 Channel on which I/O is to be performed. 


The leftmost bit (bit 0) of an RS field is always set when the operation is complete. Consequently, 
storing a result descriptor locks the descriptor to GISMO. The MCP may lock a descriptor as well, 
if the status field does not contain 01. Gismo initiates only ready descriptors, descriptors with status 
bits equal to 00. When the operation is initiated, GISMO sets the status bits to 01. 


During an I/O operation, bits 2-11, designated GISMO Toggles, are used by GISMO to store informa- 
tion that it needs concerning the operation. 


GISMO/Hardware Interface 


The I/O descriptor contains most of the information GISMO needs to accomplisn an I/O operation. 
In the actual hardware interface, the OP, BEGIN, END, DISK address and ACTUAL__END fields 
are used. The ACTUAL__END field is 24 bits in length and immediately precedes the RS field in each 
descriptor. The field is used by GISMO while the operation is in process to store the memory address 
of the data that is to be transferred to or from the memory buffer. When the operation is complete, 
the ACTUAL__END field contains the address of the next bit at which data would have been accessed. 


Each control is able to buffer (store) a certain amount of data to be transferred. The size of the buffer 
depends on the device. The amount of data that may be contained in the controls and the procedures 
that GISMO must follow in the execution of an operation are specified when the control is designed 
and do not change afterward. 
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/O Chaining 


The I/O subsystem of the B 1000 system does not use queues for I/O operations. Using the facilities 
described in the preceding paragraphs, it connects all I/O descriptors that are directed to the same con- 
trol or group of controls connected by an exchange into a circular chain. This eliminates the need to 
direct an I/O COMPLETE interrupt to the MCP as long as the requestor, usually a user program, 
does not produce requests faster than they can be satisfied. In other words, if the I/O subsystem is 
completing operations before they are actually required by the user, the user never needs to wait for 
the completion of an I/O request, and the MCP never needs to suspend the program waiting for such 
a completion. 


Even when the user program is forced to wait for the completion of I/O requests, the amount of pro- 
cessing needed to suspend and then reinstate a program is minimized by the use of chaining. Processing 
is limited to that required for program execution; none is needed to tell the I/O subsystem what it 
should do next because that information is already contained in the I/O descriptor. 


For all devices except tape and disk, the MCP constructs a circular chain of descriptors in memory. 
GISMO executes the requested operations in turn as each descriptor is unlocked by the MCP. Upon 
encountering a locked descriptor, GISMO simply stops going through that chain until the descriptor 
is unlocked. This occurs when the user program requires a physical I/O operation or when the file 
is closed for any reason. If the program must wait on an operation, an I/O COMPLETE interrupt 
is requested through the use of the appropriate bit in the RS field, and the program is then suspended 
pending the occurrence of the interrupt. 


Disk I/O Chaining 


The disk I/O subsystem operates somewhat differently from the operation just described. Since each 
disk I/O descriptor contains a disk address field, it is not necessary for the operations to execute in 
any particular order. Various means are provided in the software to avoid contention problems. 
(Similar techniques are needed in I/O subsystems that utilize queueing instead of chaining.) 


All I/O descriptors for disk controls are connected in the same chain. If the system has more than 
one disk control, then each Channel Table entry points to the head of the chain. If GISMO encounters 
a descriptor that is not ready for execution or is already in process (RS field, bits 0 and 1 not equal 
to 00), it does not stop but continues to the next descriptor in the chain. Also, if an exception condition 
occurs, GISMO does not stop as it does on other controls. Both of these actions are specified by the 
LINK__ON__EXCEPTION bit in the Channel Table. 


Since GISMO continues linking in both of the cases mentioned above, it must know when it has exam- 
ined all the descriptors in the chain. At that time it must stop to free the processor for other execution. 
To accomplish this, a special descriptor with the IO OP field set to @840000@ is used to mark the 
top of the chain. 


The PENDING bit in the Channel Table. is set by GISMO when it receives a dispatch operation from 
the MCP. When GISMO links to the special descriptor denoting the top of the chain, and the PEND- 
ING bit is set, it does not stop but resets the PENDING bit and continues linking. If the PENDING 
bit is reset when GISMO links to the top of the chain, GISMO stops linking. 


This method assures proper functioning of dispatch operations that occur in a sequence different from 
that of the descriptor link fields. For example, if descriptors A, B, and C are present in the chain, 
and B is dispatched, GISMO links to and initiates B. If, during the time that B is in process, A is 
dispatched, GISMO links past C to find and initiate A. 
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Since all descriptors for all disk controls are maintained in the same chain, GISMO must be able to 
recognize descriptors that are addressed to controls different from the one it is handling. This is accom- 
plished using bits 20-23 of the RS field of the I/O descriptor. Upon encountering an unlocked I/O 
descriptor, GISMO compares this field to the channel it is executing upon. If the two are not equal, 
GISMO does not mark the descriptor in process but continues linking. 


Disk 1/0 Overlapped Seeks 


When an I/O operation is initiated on a moveable arm disk device with the arm positioned to a cylin- 
der different from the one specified in the descriptor, the arm must be moved to the proper cylinder. 
This operation is called a “seek.” On the B 1000 system, all seek operations are implicit; there is no 
explicit seek operation in the hardware. The MCPs initiate disk I/O operations without regard for the 
current arm position. If arm movement is required, it is accomplished by GISMO, the control, and 
the device without the participation of the MCP, which never knows when a seek is required or is 
being performed. 


All seek operations are overlapped. This means that the arm of any given drive may be in motion si- 
multaneously with the arms of other drives. Also, the control may be performing data transfer or any 
other operation while the arms are in motion. This is accomplished by the control returning a result 
descriptor with RS bit 16 = 0 to inform GISMO that some special action is necessary and that the 
result descriptor should not be stored. In this particular case, the control also informs GISMO that 
the selected drive is now seeking (RS bit 3 = 1). No further operations are initiated upon that drive 
until GISMO is informed by the hardware that the seek operation has completed. 


All disk pack controls except the DSC on the B 1990 notify GISMO that a seek operation has com- 
pleted by raising Service Request while in Status Count 1. GISMO again sends the descriptor to the 
control and this time, after any required latency period, data transfer occurs. 


Because the DSC has an I/O descriptor buffer for each disk unit, it does not interrupt GISMO when 
the seek operation completes. Instead, it retains control of the I/O descriptor until it is ready for data 
transfer to occur. 


Tape I/O Chaining 


The chaining of I/O descriptors for magnetic tape controls is perhaps the most complex of the three 
chaining operations. The complexity is caused by the fact that tape 1/O descriptors directed to each 
separate tape unit must be executed in logical sequence, and there may be several such units attached 
to the same controls. It does not matter which unit GISMO addresses next, but the descriptor that 
is used to address the unit must be the next logical descriptor in the ’subchain” for that unit. There- 
fore, it is necessary to break the channel chain into subchains (one subchain for each physical unit) 
and to implement a means of remembering the next logical descriptor that must be used within each 
subchain. 


Both of these requirements are satisfied by the LOCK descriptor. LOCK, a pseudo I/O operation, is 
handled completely by GISMO and causes no physical I/O operations. It also serves as a means of 
resolving contention problems between the MCPs and GISMO and between two or more tape controls 
that are attached to the same units by an exchange. LOCK operates as follows: 


When the system is Clear/Started, the MCP constructs a tape chain with one LOCK descriptor for 
each unit connected to the system. The ACTUAL__END field of a Lock descriptor is not used, and 
the LINK field contains the memory address of the next Lock descriptor. The BEGIN and END ad- 
dress fields of the Lock descriptor contain the address of the TEST.AND.WAIT I/O descriptor that 
the MCP uses to monitor the status of each unit. This is discussed in the following paragraph. 
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When a file is opened on a tape unit, the MCP locks the Lock descriptor by swapping @01@ into 
the first two bits of the result status field. The MCP next constructs a subchain for the unit. The sub- 
chain consists of one I/O descriptor for each buffer requested by the user. The BEGIN and END ad- 
dresses of the Lock descriptor are set to the memory address of the first I/O descriptor in the subchain 
and the TEST.AND.WAIT descriptor is removed from the subchain. The BEGIN address field is not 
altered until the file is closed. The END address is modified by GISMO each time it executes an 
operation in the subchain so that the next operation to be performed on the unit is remembered. 


The LINK fields in each I/O descriptor in the subchain will address the next physical descriptor in 
the subchain, as they do for all other controls. An exception to this is the last physical descriptor in 
the subchain. The LINK field of this descriptor contains the address of the Lock descriptor for that 
unit. This prevents one unit from monopolizing the entire control and assures that GISMO will 
periodically determine if there is anything to be done on the other units. 


The REF__ADDR field of the Channel Table entry for a tape chain contains the address of the special 
descriptor with the IO OP field set to @840000@, which marks the top of the chain. GISMO, upon 
receiving a dispatch for a tape control, discards the Reference Address passed and starts at the address 
provided by the REF_ADDR field. GISMO first attempts to lock the Lock descriptor by swapping 
@01@ into the first two bits of the RS field. If successful, it fetches the address in the END field | 
of the Lock descriptor and proceeds to that address. If this descriptor is unlocked, it begins the — 
operation specified. If not, it returns to the Lock descriptor and stores the address, which it previously 
fetched from the END address field back into the END address field. 


Assume now that the descriptor at the address fetched from the END field of the Lock descriptor was 
unlocked. GISMO begins this operation and, assuming that the operation cannot be completed without 
some intermediate Service Requests, returns to the Lock descriptor and continues linking through the 
chain. Eventually, the control will raise a Service Request and reference the initiated descriptor. Upon 
completion of that descriptor, GISMO stores a result and fetches the LINK field of the descriptor. 
It then proceeds to the new descriptor and again checks to see if it is locked. If it is, GISMO returns 
to the Lock descriptor for the unit and stores the new address in the END address field. The new 
descriptor now becomes the next logical descriptor to be executed on that unit. In this manner, GISMO 
effectively maintains a logical sequence of operations that are to be performed on any tape unit. 


There is no possibility of conflict for a unit between two or more controls connected by an exchange, 


since GISMO first attempts to lock the Lock descriptor before proceeding down a subchain. Similarly, 
the MCP must lock the subchain before altering any descriptor in the subchain. 
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APPENDIX G 
DISK ORGANIZATION 


This appendix, in eight parts, describes the following disk formats: 


. Records at the beginning of system disks. 

. Records at the beginning of user disks. 

. Pack labels. 

. Master and working available tables and temporary tables. 
. Directories. 

. File headers. 

. File dictionaries. 

. File Information Blocks. 


SYSTEM DISK FORMAT 


Table G-1 shows the formats of the records at the beginning of the system disk. 


ONNUMN PWN 


Table G-1. System Disk Beginning Record Formats 


Pointed 
Address to by Description 

0 -— Pack label (HPT disks have no labels.) 

1 —— Disk sector relocation table 

2-4 CSV Master available table 

5-6 —-- CSV (Cold start variables) 

7-19 CSV Filler (Was Log mix information (if LOG is set) 
prior to 12.0) 

20-31 CSV Trace FPB 

32-47 CSV Disk directory 

48 —- SYSTEM.PCU.AND.SERIAL.NUMBERS: 

49-57 -—- Filler (Was the XM table.) 

58-63 CSV Temporary table 

64-73 CSV Working available table 
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USER DISK FORMAT 


Table G-2 shows the formats of the records at the beginning of a user user disk. 


Disk Organization 


Table G-2. User Disk Beginning Record Formats 


Address 


Pointed 
to by 


Pack label 
Pack label 
Pack label 
Pack label 


Description 


Pack label 

Disk sector relocation table 
Master available table 

Disk directory 

Working available table 
Temporary table 
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PACK LABEL 


All disks except head-per-track subsystems are identified by a standard American National Standard 
Institute (ANSI) pack label. A pack label occupies sector 0, and is non-expandable. Sector 0 contains 
pack identification information. sector 1 is the start of the sector relocation table. 


Disk Organization 


The following is a programmatic description of a pack label. 


CONSTANT PACK_LABEL_SIZE = 180;% BYTES. 
ECORD 


1 PACK_LABEL_ DECLARATION CHARACTER rae 


02 
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PL_VOLT 


PL~SERIAL_NO 
PLTACCESS_CODE 


LID 
03 PL_NAME 
03 FILLER 


| 
PL_SYSTEM_INTERCHANGE 


PL_CODE 
FITLER 
PL_OWNER_!D 
PL_TYPE 


PL_CONTINUE 
F R 


PCoDn Ee INGHIAL IZED 
PL~INITSYSTEM 
PL"DISK DIRECTORY 
PLTMASTER_AVAIL 
PLD ISK AVAILABLE 
PLTINTEGRITY 


PL_ERROR_COUNT 
PL~SECTORS XD 
PL7TEMP_TABLE 


D 
PL7ASSIGNED_TO_BPS 
PL—SP_SEC_FLAGS 
FILLER 


CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 


1 
7 
2 
% 
% 


CHARACTER (1 
CHARACTER (6 
CHARACTER (14) 
CHARACTER (1) 


CHARACTER (1) 


CHARACTER ( 


CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 


CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 
CHARACTER 


! 
| 


) 


) 


LA 
% 
% 
% 
% 


de de ae 


AACAPAOGE DEAL APAIEAEAE de 


iy we lke) 

SERIAL (CAN) NUMBER 
ACCESS CODE 

PACK ID 


SYSTEM INTERCHANGE/CODE 
= |NTERCHANGE 

= B1700 INTERNAL 

= B3500 INTERNAL 

C, ETC, ETC 

PACK CODE 00 = SCRATCH 


"yl = USER PACK 
"S'' = SYSTEM.PACK 
"c' © CONTINUATION FLAG 


NYOL2" 


INITIALIZING SYSTEM 
DIRECTORY ADDRESS 
MASTER AVAILABLE TABLE 
WORKING AVAILABLE TABL 

O = NORMAL 

1 = RECOVERY REQUIRED 


REMOVED SECTORS 

TEMP TABLE LINK 

LAST PORT, CHAN, DRIVE 
BASE PACK SERIAL NUMBER 
SPARE.SECTOR.TABLE FOR 225 
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DISK AVAILABLE TABLES 


In order to allocate disk storage, available disk space is described in the three tables described next. 


Master Available Table 


Begins at disk sectors 2, 3, and 4. 
Is expandable as needed. 


Includes a list of disk segments not removed by the XD command or by disk initialization or 
by extensions to the relocate table (RLT). 


Consists of one table for each user drive and one for each system drive. Each system drive table 
is physically located on the drive it describes. 


Working Available Table 


Begins at disk sectors 64 through 73 (@40@ through @49@) on the system disk. 
Begins at disk sectors 48 through 57 (@30@ through @39@) on the user disk. 
Is expandable as needed. 

Contains a list of available disk segments. 


When a user disk is purged, the contents of the working available table are replaced by the con- 
tents of the master available table. 


One table for each user drive and one for all system drives. The system drive table is on the 
first drive. 


Temporary Table 


Begins at sectors 58 through 62 (@3A@ through @3E@). 

Is expandable as needed. 

Provides a list of temporarily-in-use disk segments. 

At CLEAR/START time, all segments are returned to the working available table. 


One table for each user drive and one for all system drives. The system drive table is on the 
first drive. 
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General Information 


The master available table and the working available table are always maintained in sorted (ascending 
AVL__ADDRESS) order. When entries are inserted or deleted, the table is compressed or expanded. 


The temporary table is not maintained in sorted order and is not compressed and expanded. 
_All three types of table are extended as necessary. 


All three tables have the following programmatic description. 


RECORD 
01 SLOT_REC BIT (60) , 4 SLOT RECORD 
O02 DADR BIT (36), % DISK ADDRESS 
03 PCU BIT (12), % PORT, CHANNEL, & UNIT 
O4 PC BIT(7), % PORT & CHANNEL 
O4 FILLER BOOLEAN, % 
O4& EU BIT (4), 4 UNIT 
03 DA WORD, % ADDRESS 
O02 LTH WORD; % LENGTH 
RECORD 
01 AVL_REC BIT(SEG SIZE), % AVAILABLE RECORD 
02 PTRS BIT(108), % POINTERS 
03 SUCC DISK_ADDR, % SUCCEEDING RECORD 
03 PRED DISK_ADDR, 4 PRECEDING RECORD 
03 SELF DISK_ADDR, % THIS RECORD 
O02 TEMP_AVL_TYPE BIT (4), % 
% Only used in temporary tables. If the temporary table 
% requires extension segments (i.e. above the preal located 
% 5 sectors), space for the extension segment is recorded in 
% the available table. During disk cleanup (at clear start 
% for the system disk, at pack ready time for user disks) 
% the temporary table extension segments are returned to 
% available table. Extension segments are flagged by @F@, 
% base segments are flagged by e0e. 
02 SLOTS BIT (1320), #4 SLOT RECORDS 
03 SLOT (22) SLOT REC, % 22 PER AVL_REC 
O2 FILLER BIT (8); % 
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DISK DIRECTORY 


The disk directory catalogs all files on disk. The directory is a two-level (master directory and secon- 
dary directory) structure. Each master directory entry contains a file name, a type, and either the ad- 
dress of the disk file header (DFH) for the file or the address of the secondary directory for all double- 
name files with that first name. The characteristics of the directories are described next. 
Master Directory 

e Begins at sectors 32 through 47 (@20@ through @2F@). 

e Is expandable as needed. 

e Each sector contains entries for 11 files. 


e For single-name files, name, DFH address, and type are listed. 


e For double-name file, the first name and the secondary directory address for all files with that 
first name are listed. 


e There is one directory for each user drive and one for all system drives. The system drive direc- 
tory is on the first drive. 


Secondary Directory 
e Allocated as needed. 


e Is expandable as needed. 


Each sector contains entries for 11 files. 


For double-name files, the second name, DFH address, and type are listed. The file name look- 
up algorithm hashes the first name into one of the 16 master dictionary disk sectors and then 
performs a sequential search. 


Both directories have the following programmatic description. 


01 DIRECTORY BIT (1440) , 
02 DISK_SUCCESSOR DISK_ADDRESS, % FORWARD LINK 
O02 DISK PREDECESSOR DISK_ADDRESS, % BACKWARD LINK 
02 DISK SELF DISK ADDRESS, % THIS LINK 
O02 FILLER BIT (12), 
O02 DISK_NAME CHARACTER (10), % 1ST ENTRY 
O02 DISK_ADDRESS DISK ADDRESS &%. 
O02 DISK_FILE_TYPE BIT (4), % . (VALUE IS O OR 2) 
02 FILLE BIT (1200) ; % 10 MORE ENTRIES 
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DISK FILE HEADER 


The disk file header describes the physical attributes and contains pointers to each area of a disk file. 
The length of a DFH varies between one and three disk sectors, depending on the number of areas 
declared. A disk file header for a file with fixed record length has the following characteristics: 


Allocated as needed. 
Expandable from one to three sectors. 


First sector contains physical attributes and addresses for areas 1 through 25 for fixed record 
length files. 


First sector contains physical attributes and addresses for areas 1 through 23 for variable record 
length files. 


Second sector, if any, contains addresses for areas 26 through 65 for fixed record length files. 
Second sector, if any, contains addresses for areas 24 through 63 for variable record length files. 


Third sector, if any, contains addresses for areas 66 through 105 for fixed record length files. 


A programmatic description follows. 


RECORD 
01 DFH_ RECORD plea 
O2 DFH_AREA_ADDR_OFFSET BIT (16), 
SOFFSET INTO THE DFH (IN BITS) FOR THE FIRST AREA ADDRESS 
O2 DFH_FILE_TYPE BIT (8), 
*TYPE OF FILE DESCRIBED BY THIS HEADER 
02 DFH_SELF BIT (36), 
#D1SK ADDRESS OF THIS HEADER 
O02 DFH_NO_USERS BIT (8), 


02 DFH_USERS_OPEN_OUT IT 

ZNUMBER OF USERS WHO HAVE THIS FILE OPENED 1/0 OR OUTPUT 
O2 DFH OPEN TYPE BIT (4), 

*HOW THIS FILE WAS OPENED 


3 DFH_OPEN LOCKOUT BOOLEAN, 
3 DFH_OPEN_LOCK BOOLEAN, 
3 DFH_OPEN OUTPUT BOOLEAN, 
3 DFH OPEN” INPUT BOOLEAN, 
O02 DFH FTLE TYPE 8 0 BIT (4), 


*PRE-9.0 FILE TYPES 
O02 DFH_ PERMANENT BIT (4), 
HOW PERMANENT THIS FILE 1S. THE VALUES ARE --- 
O = TEMPORARY - WILL BE REMOVED NEXT CLEAR/START 
1] = PERMANENT - NORMAL FILES CONTAIN THIS VALUE 
D NOT USED 
= 1AD FILE - CANNOT BE MOVED BY SQUASH 
= SYSTEM FILE - CANNOT REMOVE, CHANGE OR SQUASH 
JOB_WAITING ON_CLOSE BOO 
OMEONE ATTEMPTED TO OPEN THIS FILE BUT COULDN'T BECAUSE 
T 1S CURRENTLY OPENED LOCK OR THE REQUESTOR WANTS TO OPEN 
T LOCK AND ITS IN USE. TELLS CLOSE TO CAUSE ANY JOBS 
WAITING NO FILE WHEN THIS FILE IS CLOSED. 
2 DFH_NEWFILE BOOLEAN, 
STHIS FILE 1S NOT IN THE DIRECTORY YET 


02 


o 
"1 
AP dO dO BOL AO AE BOGE BE BE 


Z= 
E 
F 
0 
SOM 
| 
| 
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FILLER BIT (6), 
DFH HDR SIZE BIT (16), 
STOTAL SIZE OF THIS HEADER (iN BITS) 

DFH NO USERS LOCK BIT (4), 
%NUMBER OF USERS WHO HAVE THIS FILE OPENED WITH LOCK 
DFH RECORD SIZE BIT (20) , 
%SIZE OF THE RECORDS (IN BTS) 
DFH FILE LEVEL T (4), 
% 0 = 8.0 AND EARLIER 
% 1 = 9.0 
DFH RCDS BLOCK BIT (20), 
*NUMBER' OF RECORDS PER BLOCK 
DFH BLOCKS AREA BIT (24), 
%NUMBER OF BLOCKS PER AREA 
DFH SEGS AREA BIT (24), 
SNUMBER OF SEGMENTS OR SECTORS PER AREA 
DFH AREAS RQST BIT (12), 
SMAXIMUM NUMBER OF AREAS ALLOWED IN THIS FILE 
DFH AREA CTR BIT(12), 
SCURRENT HIGH AREA NUMBER ALLOCATED 
DFH EOF POINTER BIT 


2h), 
SHIGHEST RECORD NUMBER WRITTEN IN THIS FILE 
DFH AUDITED BOOLEAN, 

% DO NOT REINSTATE USER UNTIL 1/0 IS COMPLETE 
DFH _PROTECTION_ATTR BI 


% HOW BADLY DOES THE USER WISH TO SAVE THIS FILE IN THE 
% OFF CHANCE OF A CLEAR/START WHILE OPEN 7? 
% O = TEMPORARY 
% 1 = ABNORMALSAVE 
% 2 = SAVE 
% 3 = PROTECTED 
FILLER BOOLEAN, 
DFH BPS NO BIT (20), 
SSERIAL NUMBER OF THE BASE PACK TO WHICH THIS MULTI-PACK 
%FILE BELONGS 
FILLER BIT (27), 
DFH MPF BOOLEAN, 
ZTHIS 1S A MULTI-PACK FILE 
DFH UPDATE DATE BIT (16), 
ZJULIAN DATE OF THE LAST TIME THIS FILE WAS CLOSED AFTER 
SHAVING BEEN WRITTEN ON. ALSO DATE OF LAST NAME CHANGE. 
%FOR CODE FILES, ITS THE DATE OF THE LAST MODIFY. 
FILLER BIT (4) , 
DFH CREATE TIME BIT (20), 
STIME THE FILE WAS OPENED OUTPUT NEW. 
FILLER BIT (32), 
DFH SAVE FACTOR BIT(12), 
SNUMBER OF DAYS TO SAVE THIS FILE. NO SIGNIFICANCE. 
DFH CREATION DATE 


BIT (16), 
*JULIAN DATE OF WHEN THIS FILE Bye OPENED OUTPUT NEW. 
DFH_ACCESS DATE BIT (16), 
SJULIAN DATE OF WHEN THIS FILE WAS LAST OPENED. FOR CODEFILES, 
*DATE LAST EXECUTED OR MODIFIED. 


FILLER BIT (61), 
DFH_UPDATE_VERSION BOOLEAN, 

*DMS USE ONLY 
FILLER Bla ere 
DFH VERSION BIT (36), 

*TIME AND DATE OF THE LAST CLOSE. I/S AND DMS ONLY. 
DFH_ PROTECTION BIT (2), 


% O = PUBLIC FILE 
4 1 = PRIVATE FILE 
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02 DFH_ PROTECTION _10 | BIT (2), 
% 0 = ACCESS MAY BE 1/0 
% 1 = ACCESS MAY BE INPUT ONLY 
4 2 = ACCESS MAY BE OUTPUT ONLY 


O02 DFH USERS FROZEN BIT (8), 
2-NUMBER OF USERS FOR WHO THIS HEADER CANNOT BE ROLLED OUT 
02 See Be 
O02 DFH MINRECS1ZE BIT (20), 
*MINIMUM NUMBER OF BITS IN EACH LOGICAL RECORD 
O02 DFH MAXRECSIZE BIT (20 
*MAXIMUM NUMBER OF BITS IN EACH LOGICAL RECORD 


RECORD 
O1 AN_AREA_ADDRESS BIT (36), 
02 DFH UNIT BIT(12), 
03 DFH_PC BIT(7), 
O4 DFH_PORT Bay 
O4 DFH CHAN BIT (4), 
03 DFH_SER_NO_FLAG BOOLEAN, 
03 DFH EU Beet 
O02 DFH_ADDR BIT (24) ; 
RECORD 
O1 AREA ADDRS BIT (3780) , 
02 AREA ADDR (105) AN_AREA_ADDRESS, 


O02 FIRST_AREA REMAPS AREA_ADDR AN_AREA _ ADDRESS; 
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B 1000 FILE TYPES 


DEF INE 
DATA_TYPE_FILE (X) AS 
#((% = 0 OR X = 9 OR X = 11) OR (X >= 13 AND X <= Ss) 
OR (X >= 17 AND X <= 22) OR (X >= 60 AND X <= 109))# 


CODE TYPE ee AS % 
#(X = 8 OR (X >= 110 AND X <= 139))#, 
MICROCODE _TYPE_FILE (X) As % 
#(X = 7 OR (X >= 140 AND X <= 169)) #3 
CONSTANT 
SOR CRSEUAEROSOTC ROUSE eT TORT SSAA NT CAUSE TENT eRUe CUES eT SeSUSST See eS e 
: VALID FILE TYPES : DFH_FILE_TYPE, FPB_FILE_TYPE : 
% % 
Serna ety er Cente T ete Senn ea POON e RO SNE U ANTS RSENS DET RPA Er atee 
SBP CSG % 
% DESCRIPTION CODE ABVR CODE : 
% % 
: SYSTEM FILES : 
LOG FILE = O01, % 'rog " 000 % 
DIRECTORY_FILE = 002, % DIR 301 &% 
PSR_DECK = 003, % "DECK! 306 % 
PRT_FILE = ooh, % UPRT " 304 & 
PCH FILE = 005, % PCH ! 305 % 
DUMP TYPE FILE = 006, % "DUMP! 000 % 
INACTIVE TOG FILE = 010, % "TLOG!"! 000 % 
INTRIN FILE ~ = 012, % NUNSC! 119 % 
USERCODE FILE = O16, % NUSER!! 000 % 
MCP_TEMPORARY_FILE = 023, % TEMP! 000 % 
. JOBLOG_FILE = 024, % "JLOG" 000 : 
: 025 <----- > 059 RESERVED FOR ADDITIONAL SYSTEM FILES : 
een ee ne ee ee Er: % 
% 
: DATA FILES : 
UNSPECIFIED _DATA_FILE = 000, % UDATA" 000 % 
DATA FILE = 009, % “DATA! 000 % 
VARI ABLE_LENGTH_FILE = O11, % NVAR " 000 % 
DMS DATA FILE = 013, % "DMS " 000 & 
DMS_DICTTONARY = O14, % "IDMSD!! 000 % 
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DMS _AUDIT_FILE = 015, % "NAUDT! 000 % 
RELATIVE = O17, % "REL " 000 % 
INDEX _SEQ GLOBAL FILE = 018, % "iS Gi 000 % 
INDEX SEQ DATA SET_FILE = 019, % "iS p! 000 % 
INDEX SEQ INDEX FILE = 020, % TR 000 % 
INDEXED TAG FILE = 021, % "TAGS! 000 % 
INDEXED DATA_FILE = 022, % "ENXD! 000 % 
SDLSYMBOL = 060, % "SDL " 000 % 
COBOL68SYMBOL = 061, % "C068" 004 % 
RPGSYMBOL = 062, % RPG " 031 &% 
NDLSYMBOL = 063, % WNDL " 012 &% 
FORTRANSYMBOL = 06h: % "FOR "! 010 % 
MILSYMBOL = 065, % MMIL " 000 % 
BAS! CSYMBOL = 066, % "BAS " 002 % 
UPLSYMBOL = 067, % NUPL 000 % 
COBOL74SYMBOL = 068, % "CO74" 035 % 
FORTRAN77SYMBOL = 069, % LT yy 033 % 
1BAS|ICSYMBOL = 070, % "Tt BAS" 000 % 
DASDLSYMBOL = O71, % "DASD! 005 % 
PASCALSYMBOL = 072, % "PASC! 030 % 
SDL2SYMBOL = 073, % "SDL2" 000 % 
NON NATIVEDATA = Oo7h, % "IDTA" 000 % 
IBASIC INTERNAL = 075, 4% "TBSU" 000 % 
FORTRAN77 UNFORMATTED = 076, % METZ! 000 % 
COBDMS_LIB = O77, % "CDMS! 000 % 
RPGDMS LIB = 078, % UMRDMS!! 000 3% 
NETWORK INFORMATION = 079, % NTF 000 % 
NDL_ LIBRARY = 080, % "NDLB!" 000 % 
PASCAL_INTERCHANGE DATA = 081, % "NPIDF! 000 % 
PASCAL MODULE _DATA = 082, % "MPSMD!! 000 % 
SORTSYMBOL = 083, % "SRTS" 034 % 
SEQDATA = 084, % "SEQD" 020 % 
JOBSYMBOL = 085, % "JOBS" 026 % 
UPL2SYMBOL = 086, % NUPL2" 000 
: WFL_DATA_DECK = 087, % "DATA! UNK : 
: 086 <----- > 109 RESERVED FOR ADDITIONAL DATA FILES : 
Br rr nr nn nn enn ee enn nn nn nn eee eee eee % 
% % 
*CODE FILES % 
% % 
CODE FILE = 008, % "CODE" 100 % 
SDLCODE = 110, % "SDLO" 100 % 
COBOL68CODE = 111, % "C680" 103 % 
RPGCODE = 112, % "MRPGO! 162 % 
NDLCODE = 113, % NNDLO!! 109 % 
FORTRANCODE = 14, % "NE QRO!! 107 % 
MILCODE = 115, % "MILO" 100 % 
BAS|ICCODE = 116, % "BASO" 102 % 
UPLCODE = ne % "UPLO" 100 % 
COBOL74CODE = 118, % "C740" 165 &% 
FORTRAN77CODE = 119, % "E770" 163 % 
IBASICCODE = 120, % "1 BSO" 100 % 
PASCALCODE = 121, % "PSCO! 161 % 
SDL2CODE = 122, % "'S§D20"! 100 % 
SMCPCODE = 123, % "'SMCP!! 120 &% 
MCSCODE = 124, % "MCSO!! 100 % 
NON NATIVECODE = 125, % "ICDE! 100 &% 
B500CODE = 126, % "BSO ! 100 % 
1BM1400CODE = 127, % "TBMO! 100 % 
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SORTCODE = 128, % "SRTO" 164 % 
SDL2ZUNBOUNDCODE = 129, % "SD2u"! 100 % 
JOBCODE = 130, % "JOBO"' 115 % 
% UPL2CODE = 131, % "UP2C" 100 
: 131 <----- > 139 RESERVED FOR ADDITIONAL CODE FILES ; 
Ba eee ere ene me snes a nea serena n se ee sce enna seen acess % 
% % 
: MICROCODE Bele EE. 3S : 
INTERPRETER FILE = 007, % "INTP! 130 % 
SDLINTERPRETER = 140, % "SDLI" 130 % 
COBOL68INTERPRETER = hl, % "C681" 122 4% 
RPGINTERPRETER = 142, 4% "RPGI" 125 % 
NDLMICROCODE = 143, 4 "NDLI" 130 % 
FORTRANINTERPRETER = 144, 4 "FORI" 123 % 
BASICINTERPRETER = 145, % "BASI" 130 % 
UPLINTERPRETER = 146, 4% "UPLI" 130 % 
COBOL74INTERPRETER = 147, 4% NCTA" 130 % 
FORTRAN77 INTERPRETER = 148, 4 aoe a a 130 % 
IBASICINTERPRETER = 149, % "TBST" 130 % 
PASCALINTERPRETER = 150, % es 3 130 4 
SDL2INTERPRETER = 151, 4% "SD2I" 130 % 
MI CROMCP = 152, % "MMCPE 130 % 
GISMO = 153, % "GSMO" 130 % 
SYSTEM_INITIALIZER = 154, 4% "INIT! 130 4 
B5OOINTERPRETER = 155, % "BEI ' 130 % 
IBMI4OOINTERPRETER = 156; % "IBM" 130 % 
, % END OF FILE TYPE DEFINES Reon Sango eae tte 
: 15] “<sse= > 169 RESERVED FOR ADDITIONAL MICRO CODE FILES 7 
Bmw ren rr nnn nen mn enn cece nnn nn mewn nn nnn enn nnn eran nnnmeccnnn % 
% % 
: ROOM TO GROW s 
% L7O<Ser2~ > 199 FUTURES % 
% 200. <==<9= > 219 RESERVED FOR DISKMAP % 
as 220 (s-se7= > 255 FUTURES % 
4 


BLBDLDEBCOCOLRDCBCDEDRDRERDLDLLDLEDEDLDEDEDEBOERDLRERDEDDDEEDEDEDEDLDEDES 
BELDELDOCOCBLRCRCECECDRDEELEDEREDEDEDLEREDEREREREDERDECODBDEDCDEEDEKEDS 
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FILE DICTIONARY 


Every program that has any files declared for input of output has a file dictionary. The dictionary 
is a set of system descriptors. There is one system descriptor for each file declared, plus one for the 
trace file. (Appendix E, Memory Management, includes a programmatic description of a system de- 
scriptor.) The trace file is used by debug interpreters to write trace information. The RAID system 
file equates the trace file to a queue file that has been opened by RAID. 


At the time a system memory dump is executed, each file in the dictionary is either open or closed. 
If the MEDIA field FIB (file information block) dictionary contains MEDIA, the File Information 
Block (FIB) is in memory at the address in the ADDRESS field, and the file is open if 
FIB.OPEN__FLAG is TRUE. If the MEDIA field is blank and the address field contains zeros, the 
file is closed. If the MEDIA field is blank and the address field is non-zero, the file information block 
and any file buffers are rolled out to disk, and the file is open if FIBLOPEN__FLAG is TRUE. 


FILE INFORMATION BLOCK (FIB) 


As each file is opened by the user program, a File Information Block (FIB) is created in memory by 
the MCP. The FIB contains all information necessary for the MCP to perform I/O operations on the 
file. Much of the information in the FIB is taken directly from the file declaration in the user program. 
Other information is inserted by the MCP, based upon the characteristics of the peripheral device as- 
signed to the file. 


I/O descriptors and buffer memory areas are allocated and initialized when the file is opened. There 
is only one memory link for each file that is open. Buffer areas and descriptors are not normally shared 
between files, although exceptions to this rule include DMS, Data Comm, and Indexed files. 


FIB size depends upon the type of device assigned to the file. Due to the amount of information that 
must be maintained, a disk file FIB is much larger than a card punch file FIB. 


A complete programmatic description of a FIB follows. 


CONSTANT 
FIB_SIZE = 1048, 
FIB_ COMMON SIZE = 268, 
FIB SIZE_ EXTRA _BNALIO = 402 
FIB SIZE QUEUE = 33, $ INCLUDES 1 ELEMENT 
FIB SIZE PORT = 451, % INCLUDES 1 SUBFILE 
SUBPORT_ARRAY_SIZE = 77, 
FIB_SIZE_ NDE = 933 
FIBTSIZE~U = 1048, 
FIB SIZE —DI AGNOSTIC = 442, 
FIB UNIQUE SIZE = 24717, % QUEUE PART 
FIB_SIZE_DISK = FIB SIZE, 
FIB_SIZE_BASIC = 684, 
FIB SIZE TAPE = 796, 
FIB SIZE PRINTER = FIB SIZE_TAPE, 
FIB_SIZE_MICR = 1048, 
MAX_MAX_SUBPORTS = 255, 
FIB_ORGANIZATION_RELATIVE = 1, 
FIB ORGANIZATION INDEX_SEQ = 2; 
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% 
RECORD F1IB_SUBPORT_ATTR_RECORD 


CHANGEEVENT “BOOLEAN, % 
STATE BIT (4), % 
QIN_PTR ADDRESS, % USERS INPUT SUBPORT ADDRESS. 
QOUT PTR ADDRESS, % USERS OUTPUT SUBPORT ADDRESS. 


( 
MAX_REC_SIZE BIT (16); 


% 
RECORD 1 FIB_RECORD BIT(FIB_COMMON SIZE + FIB_UNIQUE SIZE), 
2 COMMON BIT(FIB COMMON SIZE), % COMMON TO ALL DEVICES 
3 BOOLEANS BIT(58),.% COMMON TO ALL DEVICES 
OPEN FLAG BOOLEAN, 


% 1 = FILE HAS BEEN OPENED, NOT YET CLOSED, 
CLOSING BOOLEAN, % 
%1= FILE |S BEING CLOSED, BUT HAS TO WAIT 
% FOR |/O0 TO COMPLETE. 
MYUSE BIT (2), 
% PECULIAR 2 BIT FIELD USED BY NDL 
5 OUTPUT BOOLEAN, % 
%1 = FILE |S OPENED FOR OUTPUT, 
% MAY BE NEW OR OLD FILE. 
5 INPUT BOOLEAN, %DONT CHANGE POSN FIB.OUTPUT. 
%1 = FILE IS AN OLD FILE OPENED FOR 
% INPUT OR OUTPUT OR BOTH (RANDOM OR SEQ) 
STOP_10  BOOLEAN,% 
%1 = 1/0 STOPPED, DUE TO 1/0 ERROR OR EOF. 


lL ENHANCED_IO_PERMITTED BOOLEAN,% 


%O = SUPPRESS ENHANCED 1/0. NOT USED YET. 

VARIABLE BOOLEAN,% 
1 = FILE HAS VARIABLE LENGTH RECORDS, 

% HENCE FIB.RECORDS.BLOCK WILL BE SET TO 1 

% FIB.ACCESS MUST NOT BE 1 (RANDOM I/O), 

% FILE POSITIONING |S NOT ALLOWED YET. 
COBOL_FILEF BOOLEAN, 

%1 = FILE IS TO BE HANDLED AS COBOL FILE. 

% HENCE HANG PROGRAM IF OPEN IS INVOKED 

% WHILE FILE IS. ALREADY OPEN, 

% CLOSE IS INVOKED WHILE FILE IS NOT YET 

% OPEN OR ALREADY CLOSED, OR EOF HIT 

% TWICE. 
LABELED BOOLEAN,% 

%1 = FILE |S LABELED (MEANINGLESS FOR DISKS) 
PSEUDO BOOLEAN,% 

%1 = FILE IS A PSEUDO READER ON DISK. 
BACKUP BOOLEAN,% 

%1 = FILE IS BACKUP PRINTER OR PUNCH ON 

% TAPE OR DISK. 


L DMS BOOLEAN,*% 


%1 = FILE IS DATA MANAGEMENT. 
DEVICE_FLAGS BIT(14) ,% 
SACTUAL DEVICE TYPE. VERY USEFUL. 
REVERSE BOOLEAN, % 
CRD96 BOOLEAN, % 
DATA_RCDR BOOLEAN, 
DISK DEVICE BOOLEAN, 
= FILE 1S ACTUALLY ON DISK, 
% PROBABLY PSEUDO.READER OR BACKUP OR 
% "FILE EQUATED'' BEFORE OPEN TIME AS DISK. 
DISK_PACK_DEVICE BOOLEAN, 
TAPE DEVICE BOOLEAN,% 
REM BACKUP BOOLEAN, % 
PUNCH BOOLEAN, 


WIT 


WoT 
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5 MCP_CLOSE REEL BOOLEAN,% 
5 EOF _REPORTED BOOLEAN,% 
%1 = EOF HIT ONCE. IF FIB. COBOL, THEN 
% NEXT HIT ON EOF WILL HANG PROGRAM. 
5 PRINTER_DEVICE BOOLEAN, 
5 TRACE BOOLEAN,% THIS IS A TRACE.FIB 
5 LINAGE CODE BOOLEAN, % INVOKE LINE COUNTER CODE 
5 PRINTER CHECK BOOLEAN, % 
10 SEG unre REQ Gat. % 
10_ERR 
5 
5 
5 
5 


R_INFO BIT (7), 
TO_ERROR_SEEN SMCP BOOLEAN, % 
|O™ERROR_THISCOMQ BOOLEAN, % 
10 ERRORTON READ BOOLEAN, 
|O"ERRORTTYPE BI! ,% 
% 1 = EOF OR EOP 
2 = PARITY 
% 3 = INCOMPLETE 1/0 
% = EOF ON PAPER TAPE READERS 
% 5 = EOV ON LDDMP MULTIFILE SEARCH 
TEMPORARY FREEZE BOOLEAN, % LOCK FIB IN MEMORY 
DUMMY_FILE BOOLEAN, 
% NO LOGICAL 1/0 TO BE DONE 
CANNOT_CLOSE LOCK BOOLEAN,% 
% OPENED ON-BEHALF- OF BUT WITH ERROR; 
AUDITED BOOLEAN, % 
% DO NOT REINSTATE USER UNTIL 1/0 1S COMPLETE 
MPF BOOLEAN,% MULTIPACK DISK FILES. 
CLOSED_HERE BOOLEAN, % MPF WAITING DISK. 
EOT BOOLEAN,% END OF TAPE REEL. 
%THIS BIT ALSO MEANS END OF BACKUP IF FIB DISK 
EMULATOR_TAPE BOOLEAN, % 
CYL _ALLOC BOOLEAN,% USER WANTS CYLNDR BOUNDS 
WAI TNEWAREA BOOLEAN, H 
% 1/0 STOPPED WAITING FOR NEW AREA ON MULTI 
% PACK FILE (INPUT OR OUTPUT) OR ELSE NON 
% MULTIPACK OUTPUT FILE NEEDS DISK SPACE. 
NEWAREA BOOLEAN, % 
% NEW AREA HAS BEEN CREATED ON OLD OR NEW 
% DISK FILE, HENCE AT CLOSE OR DS, AREAS IN 
% TEMPORARY TABLE MUST BE REMOVED, OR ELSE 
% NEXT CLEAR/START WILL CLOBBER DISK. 
SPECIAL_EU BOOLEAN, % 
% EU NO SPECIFIED BY USER FOR HPT ONLY. 
OPEN_LOCK BOOLEAN, % 
MCP INTERNAL BOOLEAN,% "PARAMETERS" FILE FOR LO 
% LOAD.DUMP USE ONLY. 
NEWFILE BOOLEAN,% OUTPUT NEW, FIB.INPUT=O. 
LABEL_IN PROCESS | BOOLEAN, %USED IN PARTICULAR FOR 
%D.RECORDER OPEN LABEL. 
PRINTER_FILE BOOLEAN, %FILE 1S PRINTER HARDWARE 
FILE WRITTEN ON BOOLEAN, %DISK FILE UPDATED 
PROTECTION ATTR BIT (2), 
% © = TEMPORARY 
% 1 = ABNORMALSAVE 
% 2 = SAVE 
% 3 = PROTECTED 
OPTIONAL_FILE BOOLEAN, 
OPEN LOCKOUT BOOLEAN, 
DIAGNOSTIC FILE BOOLEAN, 


% INDICATES THIS 1S A DIAGNOSTIC FILE 
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4 BNA_FILE BOOLEAN, 

HAVE ONLY LOGICAL, NO PHYSICAL, FILE. 

ALSO MEANS THAT PORT_STATE_VARIABLES (RECORD AT 
END OF FIB) LIVE AT END OF FIB EXCEPT FOR 
DEVICE = PORT_FILE. PORT_STATE_ VARIABLES ARE 
USED ONLY IN BNA LOGICAL 1/0 ACROSS NETWORK, 
DEVICES SUCH AS DISK, TAPE, CARD, PRINTER. 


BIT (4), 
IDENTIFIES THE TYPE OF FIB BEING USED 
O - ALL FILES SUPPORTED PRIOR TO 9.0 
1 - RELATIVE FILE 
2 - INDEXED/SEQUENTIAL FILE 
BIT (6) ,% 


FOR MPF, IT PERTAINS TO 
THE HARDWARE TYPE OF THE BASE PACK. 
NOTHING PREVENTS US MIXING DEVICES FOR 
MULTIPACK FILES. 

(8) ,% 

%FOR FUTURE USE, IN CASE OF INCOMPATIBLE 

% FIB STRUCTURES. RIGHT NOW IT IS 1. 
REAL_SIZE BIT(16) ,% 

SREAL LENGTH OF FIB, IN BITS. 

% SET UP BY OPEN IN "NO.FILE.SPACE". 
ENHANCED_!0_STATUS BIT (8) ,% 

%FOR ENHANCED 1/0 TO SAY: 

% 1|'VE DONE SO MUCH SO FAR, YOU S.MCP 

% CONTINUE WITH IT.! 

FILE_NUMBER BIT(8),% 

%= CT.OBJECT, = ENTRY NUMBER IN FIB.DICT. 

RS BIT (24) ,% 

ZADDRESS OF LIMIT.REGISTER OF RUN.STRUCTURE 
% ONLY ONE RUN STRUCTURE ALLOWED PER FIB. 
ERR REPORT FLAGS BIT (24), 
4 ERR_PRESENT BOOLEAN, 
ZERROR OCCURRED DURING POCKET SELECT 
4 FILLER BIT(10), 
4 WHO_FOUND_ERR BOOLEAN, 
% O=MMCP FOUND THE ERROR 
% 1=INTERPRETER FOUND THE ERROR 
4 |NTERP_ERROR BIT (8), 
% SAME AS RS_ITYPE CAT RS_INMBR 

4 MMCP_ERROR BIT (4), 

ERROR FOUND BY MMCP AS FOLLOWS: 
O=INVALID COMMUNICATE FROM USE ROUTINE 

(FATAL) 
1=I1LLEGAL POCKET SELECT (FATAL) 
2=JAM (NON-FATAL) 
Sgenssone (NON-FATAL) 
=NOT READY (NON-FATAL) 

TRANSLATE pea BIT (2h) , 

lk DMSGLOBALS BIT(24), 

ZADDR OF SOFT TRANSLATE TABLE IF PRESENT 


ERRORS BIT (16) 
NO OF SReIBIES FOR THIS FILE 
LIO_FILE_STATUS BIT (24 
& CHANGED ON EVERY LIO. 
NEXT_ PORT ADDRESS, % NEXT PORT FIB ADDRESS. 


BACK_PORT ADDRESS, % BACK PORT FIB ADDRESS. 
%%%%% END OF COMMON PORTION %%%%2%%222%22%32732222%3% 


ORGANI ZATION 


HDWR 


“1aeaedede AOdOaLGO Bede de dead de 


VERSION Bl 


dO BE dL IO dE BE IO 


NIQUE BIT(FIB_UNIQUE_SIZE), 


FILLER BIT(3), 
RETRY_COUNT BIT (5) .% 
SUSED BY 10.ERROR TO COUNT RETRIES. 
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3 UNIT BIT (12) .% 
SDEVICE'S PCU. FOR MPF WE NEED ALSO 
% FIB.DISK.UNIT FOR CURRENT PACK. 
kL CHANNEL BIT (7) ,% | 
&BOTH PORT AND CHANNEL. POOR NOMENCLATURE. 
4 FILLER BOOLEAN, % 
4 UNIT NO BIT (4) 08 
3 1OAT_ADDR BIT(24) ,% ADDRESS OF IOAT ("UNIT" TABLE) 
% QUEUE-F LES USE DIFFERENT FIB HENCEFORTH 
3 MINRECSIZE BIT (16) 
SMINIMUM RECORD SIZE IN BITS 
3 MAXRECSIZE BIT (16), 
| MAX MUM RECORD SIZE IN BITS 
3 RECORD_DESC BIT (48) ,% 
ZA DESCRIPTOR OF THE CURRENT RECORD 
% (THE ONE TO BE PROCESSED, NOT THE ONE 
% JUST PROCESSED). LOGICAL 1/O ENTITY. 
4h FILLER BIT (8) 6% 
4 RECORD SIZE BIT (16) ,% 
% CONSTANT UNLESS 
% VARIABLE LENGTH RECORDS. 


5 ALPHA_SIZE BIT (13) ,% 
*T0 BE USED IF RECORDS ARE CHARACTER. TYPE. 
4 RECORD_ADDR ea ’ 


3 CURRENT BIT (24) ,% 
4 DESCRIPTOR_A BIT (24) , 
ZADDRESS OF CURRENT 1/0 DESCRIPTOR, HENCE 
% INDIRECTLYT THE CURRENT BUFFER. 
% POG sCaL 1/0 ENTITY. 
3 RECORDS BLOCK BIT (20) ,% 
% =1 IF VARIABLE LENGTH 
% RECORDS. CONSTANT VALUE. 
3 BUFFER BIT (20) ,% 
ZREMAINING SPACE IN BUFFER, 
% INCLUDING THE CURRENT RECORD DESCRIBED 
% BY FIB.CURRENT, IN BITS. 
% LOGICAL 1/0 ENTITY. 
k BITS_LEFT_IN BUFFER  BIT(20), 
% FOR Das AUDIT, SIMILAR TO REGULAR MEANING 
3 BUFFER_EMPTY BIT (24) ,% 


*FOR INPUT FILES ONLY. A PHYSICAL 1/0 
ENTITY. IF PHYSICAL 1/0 STOPPED (E.G., 
WAITING FOR INPUT MPF PACK, OR EOF) THIS 
WILL POINT TO THE OLDEST 10 DESCRIPTOR 
WHOSE BUFFER IS UNFILLED. LOGICAL 1//0 
1S ALLOWED TO CATCH UP TILL FIB.BUFFER. 
EMPTY = FJB.CURRENT. 
4, BUFFER_NEXT_AVAILABLE BIT (24), 
™% FOR DMS AUDIT, CONTAINS THE ABSOLUTE ADDRESS OF 
% THE NEXT FREE POSITION IN THE BUFFER. 
3 BLOCK_COUNT BIT (24) 
% PREVIOUSLY A PHYSICAL 
% ENTITY FOR DISK FILES, BUT SINCE 5.1 
% A LOGICAL 1/0 ENTITY. FOR INPUT FILES IT 
% 1S BUMPED ONLY WHEN THE FIRST RECORD HAS 
: BEEN TRANSFERRED TO THE USER, HENCE 
PRONING THE BLOCK TO BE NON-EMPTY 
3 BLOCK_SIZE Bit oor 
CONSTANT. 
3 RECORD_COUNT BIT (oh) 
% NUMBER OF RECORDS PROCESSED SO FAR 
% EXCLUDING THE CURRENT RECORD. 


dO dO dO dO aE DOE 
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SEGS_ AREA eel *NO. OF SEGMENTS PER AREA 
EOF_PTR BIT (2 24 
%FOR OLD FILES, 1T 1S THE NUMBER OF ACTUAL 
* DATA RECORDS TO BE COMPARED WITH FIB. 
* RECORD.COUNT. IT IS THE ONLY WAY TO 
le EOF FOR VAR.LENGTH RECORDS CASE. 


Hee OF CHANNEL TABLE. 


CLOSE_TYPE Bele 
BITS WITH SAME STRUCTURE AS CT_ADVERB AND 
: CT_1 IN CLOSE. BITS ARE SET ON BY 
ruses IF SOME OTHER BITS ARE ON. 
ACCESS sit Gs ) »% 
%T0O0 TROUBLESOME TO SAY "IF FIB.DISK THEN " 
EVERYTIME WE TEST IT, SO WE FORCE IT ON 
ALL PERIPHERALS 
SERIAL 
RANDOM 
SEQUENTIAL.10 
EMULATOR. TYPE 
DELAYED.RANDOM 
EXTENDED.SEQUENTIAL.10 
DYNAMIC 
. INPUT AND FIB.OUTPUT MUST BE SET 
ONE IF FIB.ACCESS <> 0 
IT (24) ,% 
USED BY DISK AND TAPE FILES FOR LOGICAL 
RECORD NUMBER, REPLACING FIB.RECORD.COUNT 
% IN E OLD DAYS, LOGICAL 1/0 ENTITY. 
USE_AREA BIT (48) ,% 
%USED BY DISK FILES. 


OWN N — Oo 


F | 
TO 
KEY 
SE 


PIO BOP AC AO GE IH GE BO GO BE GO 


4 SPACE_CTR BIT (8) ,% COUNTER FOR SKIPPING 
% BLANK LINES ON PRINT. 
L PAGE SIZE BIT (8) ,%LOGICAL PAGE SIZE 


% (TEMP.PAGE.SIZE + TEMP.TOP.MARGIN + 
*TEMP.BOTTOM.MRGN) 

4 UPPER_MARGIN BIT (8) ,SABSOLUTE LINE # A LINE 
%OF PRINT MAY START. 

k FOOTING Be *ABSOLUTE LINE # WHERE 

EOP 1S TO BE REPORTED. 

4 LOWER_MARGIN BIT (8) ,4ABSOLUTE LINE # TO STOP 
SPRINTING ON CURRENT PAGE. 

4 LINAGE_COUNTER BIT(8) ,SKEEPS TRACK OF THE LINE 
%# FOR EACH PAGE. 

USE_ROUTINE : BIT (32) ,% USED BY MICR 


lL TEMP_PAGE_SIZE BiIT(8) ,sTOTAL # OF LINES WRITING 
ZS PERMITTED. (BODY) . 
4 TEMP_UPPER_MARGIN BIT (8) ,%TOTAL LINES IN THE TOP 


MARGIN. 
4 TEMP_FOOTING BIT (8) , *LINE # WITHIN THE BODY 
ZWHERE EOP |S REPORTED 
Lh TEMP_LOWER_MARGIN BIT(8) ,4PRINTER FIB ENDS HERE. 
SMICR FIB ENDS HERE. 
*TOTAL # OF LINES IN THE 
*BOTTOM MARGIN. 
LAST OP Bir hae »sLIO PREVIOUS OP CODE. 


LAST SPACING BIT(4) ,@L10 PREVIOUS SPACING 
CURRENT_OP BIT (4) ,%L10 CURRENT OP CODE. 
FIRST _WRITE_BACKUP BOOLEAN,%FOR MMCP 

FILLER Ane 

COUNT_CARDS BIT (1), 

COUNT_LINES BIT(1), 
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3 LIO CURRENT STATUS BIT(3), 
4 LTO_OVERFCOW BOOLEAN, %SPACE PAST BOTTOM MARGN 
4 LIO EOP BOOLEAN, *SPACE INTO FOOTING. 
4k LIQ WRITE_PENDING BOOLEAN, *SPOSITION BEFORE WRITE. 
3 FILLER BOOLEAN, 
3 PRINTER_TYPE BIT (2), 
% 00 450- 700 LINE PER MINUTE PRINTER. 
% O01 1100 LINE PER MINUTE PRINTER. 
% 10 NOT USED. 
% 11 1500 LINE PER MINUTE PRINTER. 
3 DISK_ADDRESS BIT (36) ,% 
% DISK ADDRESS OF BLOCK LAST RELEASED 
% (FOR OUTPUT FILES) OR LATELY READ-INT 
h DISK PCU BIT (12) ,% 
5 DISK PC BIT (7), 
5 SER NO FLAG BOOLEAN, 
5 ol EU BIT (4), 
4 DISK SG BIT (24) , 
3 HEADER BIT (24) ,% 


ZMAY BE SHRUNK TO 12 BITS IN FUTURE. 
3 AREAS BIT (8) ,% 
: IF FIB.OUTPUT THEN MAXIMUM POSSIBLE AREAS 
% REQUESTED BY USER, ULSE ACTUAL NUMBER 
&% OF AREAS CONTAINING DATA. 
3 AREA_NUMBER BIT (8) ,% 

SPHYSICAL 1/0 ENTITY. AREA NUMBER (COUNTING 

% FROM ZERO) WHERE LATEST 1/0 OCCURRED. 

% WARNING: VALUE SHOULD BE <105 

% EXCEPT 255, WHICH MEANS -1. 

3 BLOCKS_AREA BIT (24), % 

% SINCE RELEASE 5.1 WILL BE 

% ABLE TO HANDLE PARTIAL BLOCK AT THE END 

% OF EACH AREA. PREVIOUS RELEASES SIMPLY 

% IGNORE THEM. 

3 BPA_COUNT BIT(24) ,% 

SPHYSICAL 1/0 ENTITY. 
VALUE=1+"'F1B.BLOCKS.AREA' - NUMBER OF 
DATA BLOCKS IN CURRENT AREA PRIOR TO AND 
EXCLUDING THE CURRENT BLOCK. IN SERIAL 
1/0, WHEN THE SECOND LAST BLOCK 1S 
RELEASED BY RELEASE.BUFFER, FIB.BPA.CT 
FOR OUTPUT FILES WILL BE REDUCED FROM 3 
TO 2 AND FOR INPUT FILES FROM 2 TO 1. 
AWKWARD, BUT PRECISE. A CALL FOR 
NEW.AREA |S TRIGGERED WHEN RELEASE.BUFFR 
FINDS THAT FIB.BPA.CT IS TO BE REDUCED 

FROM 1 TO 0. NEW.AREA WILL RESET IT TO 
TO (FIB.S.At+tFIB.S.B-1) /FIB.S.B=FIB.B.A 
_ 3 SEGS BLOCK BIT (12) % 
A CONSTANT. PREVIOUSLY 
: pact ee FIB.SEGS. 
3 RECORDS_AREA BIT (24) ,% 
% MAY NOT NECESSARILY BE 
% A MULTIPLE OF FIB.RECORDS.BLOCK. 
% MEANINGLESS FOR VARIABLE LENGTH RECORDS. 
EU_DRIVE BIT (4) ,% 
SNOT ag YET. 
PSEUDO_RDR ae ar 
SADDRESS OF PSEUDO READER TABLE. 
MAX RECORDS BIT (24) ,% 
PARTIAL BLOCK SIZE BIT (24) ,%=FIB.S.A MOD.FIB.S.B 
FILLER BTT (2) ,% 


BOIL BODE BO DE ABODE AO AO BODE 
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3 RELATIVE_RECORD INDEX BIT (20), 
%%% END OF STANDARD FIB So RASS ENS eeo wees se esas seen ees 
2 NDL_PART REMAPS ayo BIT (FIB_SIZE_NDL-F1IB_COMMON_SIZE), 


3 NXT_FIB BIT (24), 
3 BCK_FIB BIT (24), 
3 QUE_NR BIT (24), 
3 MCS_PRTCP BIT (2), 


k MCS _PRTCP_OUTPUT BOOLEAN, 
t MCS PRTCP_INPUT BOOLEAN, 


3 RMT_KEY BOOLEAN, 
3 HDR” BOOLEAN, 
3 SIMPLE_HEADERS BOOLEAN, 
3 RSDNT BIT (2 a) » 
3 MCS_FL BIT (8), 
3 LGL_STN_NR BIT (10), 
3 RND_RBN_ BIT Heys 
3 CUR MAX STN BIT (10), 
3 REAL MAX STN BIT (10), 
3 INPUT COUNT BIT i 
3 OUTPUT COUNT BIT (24), 
3 AUD_REC BOOLEAN, 
3 MSG_ID_VALID BOOLEAN, 
3 MSG_ID BIT (20) ,% MSG.TIME, E.G. 
3 CREATED BOOLEAN, 
3 JN TBL ADDR WORD, 
3 LSN_LIST ADDRESS,% POINTS TO C74.LSN.LIST. 
3 QUES NAME CHARACTER (48 ); 
4 QUE_NAME_1ST_3 CHARACTER (3) , 
h FILLER CHARACTER (45) , 
3 C74 ESI CHARACTER (1), 
3 C74L_EMI CHARACTER (1); 
3 C74_EGI CHARACTER (1), % EGI NOT IMPLEMENTED. 


3 LGL_STN TBL BIT(11), 

4 LGL_STN BIT (10), 

4 STN_DTCHD BOOLEAN, 
BYEZ END NDL FIB SEVVVVBVVVSABVBBAVVBAVAVSVLYBVLAYBY 


2 UFW_PART REMAPS UNIQUE BIT(FIB_S!IZE_UFW-FIB_COMMON_SIZE), 

3 UFW_FIRST_TIME_THRU BOOLEAN, 

3 UFW_LAST_OP_READ BOOLEAN, 

3 UFW_DUPLTCATE BOOLEAN, 

3 UFW_MATCH_ FOUND BOOLEAN, 

3 UFW_UPDATE_FLAG BOOLEAN, 

3 UFW_FIRST_PASS BOOLEAN, 

3 FILLER BOOLEAN, 
3 UFW WRITE ERR REPORTED BOOLEAN, 

3 UFW_ACCESS MODE BIT (4), 

3 UFW_JOB_NUMBER BIT (24), 

3 UFW RECORD ADDRESS BIT (24) , 

3 UFW_KEY_POINTER ADDRESS, 
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oO 
fos) 
~~ 


( 
4 UFW_BINARY_SEARCH_ARGUEMENTS 
UFW_INTERFACE_PADS B 

5 UFW_FIRST_24 ~ B 
5 UFW_DESCR_ B 
UFW_TYPE B 
UFW_LENGTH B 
B 

B 

B 

B 

B 

B 


UFW_ADDRESS 

UFW_R REMAPS UFW_DESCR 
UFW_SECOND_24 

FILLER 

FILLER 

L UFW_SAVE_STATE_AREA 
UFW_GLOBAL_POINTER ADDRESS 
UFW_CURRENT_ STRUCTURE ae ay 


UFW_HEADER aah 
4%%% END UFW F iB B TESS tE CeCe SE SSA eS Stet eS tee et et eee tet o 4 


LS 2] 
RO AHO 
| 
—] FP rornwwr o.- 


BO Fee See Cree Cees Cee Me eet eet No 


““e @ wwe we ew ee 


UEUE_PART REMAPS UNIQUE 


~FIB_SIZE_ QUEUE + 102 k 24 - FIB_COMMON_SIZE), 


FILLER BIT (44) ,% Q-DISK GOODIES 
Q FAMILY SIZE BIT (24) ,% QFF # MEMBERS 
Q_READ_1I0_DESC BIT(24),% REF-ADDR OR ZERO 
Q-WRITE_I0_DESC BIT(24),% REF-ADDR OR ZERO 
Q FAMILY BIT( 1),% 1 => QFF FIB 
Q_RECORD_COUNT BIT(24),% # OF LOGICAL 1/0-S 
Q PTRS1 BIT(1024 * 24) ,%FIB.Q.FAMILY.SIZE 
Lk QD_PTR (1024) BIT (24), 
Q. PTRS2 REMAPS Q_PTRS1 BIT(1024 * 24), 

PTR ae 
; FTLLER BIT (102 


#*% END NDL FIB grercirrererrerertrerrrerrrreertyerrtry 


2 DIO_PART REMAPS Cee BIT(FIB_SIZE_DIAGNOSTIC - FIB_COMMON_SIZE), 
3 DTO_PCU BIT (12 


3 
3 


ww Www WwW WwW WwW Ww w 


PORT CHANNEL AND UNIT OF PRIMARY UNIT 


DIO_1OAT_ADDR ADDRESS, 
IOAT ENTRY FOR PRIMARY UNIT 
DIO_CONTROLS BIT (3), 


NUMBER OF CONTROLS ASSIGNED TO THIS FILE 
(MAXIMUM OF &) 
DIO PC (4) BIT (7), 

% PORT AND CHANNEL OF EACH CONTROL 
DIO_CONTROL_OPENED BOOLEAN, 

% ALL UNITS SHARING THE CONTROL HAVE BEEN OPENED 
DIO _SHARED_ACCESS BOOLEAN, 

% OTHER USERS MAY ACCESS THE UNIT(S) 


aeade 8 ae 


DIO_NAMED_FILE BOOL 
% CORRESPONDS TO PHYSICAL DISK FILE 
DIO_CHAIN ADDRESS, 


% ADDRESS OF FIRST DESCRIPTOR FOR THIS FILE 


DIO_HEADER BIT (2h), 
OFFSET IN DFH.DIR OF DISK FILE HEADER 
DIO_STARTING_ADDR BIT 
% MINIMUM SECTOR THAT MAY BE ACCESSED 
DIO_STOPPING ADDR BIT (24), 
% MAXIMUM SECTOR THAT MAY BE ACCESSED 
DIO_OPS_WAITING BIT (4 
% NUMBER OF OPS MARKED AS WAITING THAT MUST COME 
CORPEETE, BEEOR: JOB CAN BE REINSTATED 
BIT 


DIO_CHANNELS 
% NUMBER OF CHANNELS ASSIGNED FOR A DATACOM DEVIC 
%#%6 END DIO FIB SRERVERPAESTEATRVELSBATASLATEAGALTSTERE 
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2 PORT_PART REMAPS UNIQUE 


x4 


(FIB_SIZE_PORT + 


BIT 

~ (MAX_MAX_SUBPORTS ~- 1) * SUBPORT_ARRAY_SIZE - FIB_COMMON SIZE), 
3 WAIT_SUBPORT BIT (8), % O-REL. INDEX TO NON-ZERO SUBP. 
3 BROADCAST_SP BIT (8), % SUBPORT# FOR BROADCAST_WRITE. 
3 MAX_SUBPORTS BIT (8), * HOW MANY USER WANTED. 
3 LASTSUBPORT BIT (8), % LAST ONE READ FROM. 

% FOR AUTOMATIC WRITE BACK TO THE SAME ONE. 
3 ROUNDROBIN BIT (8), % USED FOR "READ ANY/NEXT". 

% TO SERVICE PORTS FAIRLY, WITHOUT STARVATION OF SOME BECAUSE 

% OF OTHERS THAT ALWAYS HAVE DATA IN THEM. 
3 INPUTCOUNT WORD, # FOR ALL SUBPORTS. 
3 OUTPUTCOUNT WORD, * FOR ALL SUBPORTS. 
3 PORT_KEYS BOOLEAN, # ALL 1/0 VERBS HAVE KEYS. 
3 PORT_CHANGEE 


3 EVENT COUNT 


VENT BOOLEAN, 
BIT ( 


8), %* NUM SUBPORTS WITH CAUSED CHG EV 


3 ae SUBP_ INDEX BIT (8), 
&-GET ATTR (CHANGEDSUBFILE), GET aT TR ALTE ESTATE) 
3 SUBP (MAX_MAX_SUBPORTS) FIB_SUBPORT ATTR 
%%% END PORT FIB SELTESUSTSSELE SER ELRYERYYEYREYEIYEY 


% 
CONSTANT 


9 
9 
’ 
$ 
’ 
’ 
> 


SPS CLOSED 
SPS_AWA|TINGHOST 
SPS_OPEN PENDING 
SPS_OPENED 


SPS_SHUTDOWN_!IN_PROCESS 


SPS BLOCKED 


SPS_DEACTIVATION PENDING 


SPS” RMT_DEACTI VATED 
DEACT_RMT_CLOSE_V 
DEACT_UNREACHABLE_V 
DEACT_TIMEOUT_V 


SPS_CHNG_MASK 


tun nn t t ae 


% USED BY CAUSE SUBP_STATE_CHG, 


VALUES FOR SUBPORT_STATES: 
@00@ % REFER TO HOST SERVICES USER 
@01@ % INTERFACE SPEC 2373-2571 
@O02@ % SAME AS OFFERED 


@800008@ 


RECORD 1 PORT_STATE VARIABLES BIT (FIB_SIZE_EXTRA_BNAL1IO) 


’ 3 PORT_STATE_VARS 


BIT (200) 


; 5 ACTUAT_MAX_MSG_SIZE WORD 

‘ 5 STATE WORD % PROTOCOL STATE 

; 5 SEG STATE WORD 

; 5 RETAINED BOOLEAN % CLOSED W/ RETAIN. 
‘ 5 IMPLIED BOOLEAN 

‘ 5 TAG CHARACTER (8) 

A 5 FRAMESIZE WORD 

‘ 5 B1000 BOOLEAN *COOP HOST IS B1000 
: 5 FILLER BIT (37) 

; 3 10_SUBPORT_STATE BIT (4) 

; 3 INQ ADDRESS 

‘ 3 OUT _Q ADDRESS 

‘ 3 ACTUAL_BUFFER_SIZE WORD 

: 3 AREAS _ALLOCATED_MASK BIT (105) 
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TAPE ORGANIZATION 


This appendix is in three parts. The first, Tape Labels, describes tape label formats acceptable to 
B 1000 systems. The second, Tape Format, describes the format of the information written on a mag- 
netic tape. The third, Tape Status, describes the state of a tape after each of the various operations 
is performed. 


TAPE LABELS 


The MCP includes the capability to create and recognize two different forms of magnetic tape labels. 
The standard label format for the B 1000 system conforms to that specified in the publication entitled 
American National Standard Magnetic Tape Labels for Information Exchange, 1969, published by the 
American National Standards Institute (ANSI). These labels are commonly known as ANSI, Version 
1 labels. 


It should be noted that the standard label format for the system means that program file declaration 
requests for standard labels result in the writing of ANSI labels when the file is assigned to magnetic 
tape and opened output. 


As of MCPII level 11.0.27, ANSI Version 3 tape labels also can be recognized. 


ANSI labels as implemented on the B 1000 system contain several deviations from ANSI standards. 
The deviations insure compatibility with the B 5000/B 6000/B 7000 series systems. The most notewor- 
thy deviation is the recording mode of the label itself. Unless the American Standard Code for Infor- 
mation Interchange (ASCII) is specifically requested by the user with the SN system command, the la-. 
bel is automatically written in EBCDIC. 


ANSI Labels, though they are written when the file is opened output, are actually created on all mag- 
netic tapes prior to that time. The SN (Serial Number) system command enables creation of the initial 
ANSI label on all tapes. The SN system command is described in section 5 of the B 1000 Systems Sys- 
tem Software Operation Guide, Volume 1. 
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ANS! Tape Label Format 


The ANSI tape label format as implemented consists of three physical blocks of tape, followed by a 
tape mark. The first of the three blocks, the Volume Header, has the following programmatic descrip- 


tion. 
RECORD 
O01 VOL _HEADER_RECORD CHARACTER (80) , 
O02 FILLER Tay hk), 
02 VOL_ID CHARACTER( 6), 
O02 ACCESSIBILITY CHARACTER( 1), 
O02 RFS a ae 
03 MFID CHARACTER(17), % "0" IF NO MULTIPLE FILE ID 
% "XO" FOR 17 IF SCRATCH 
% "BACKUP" IF BACKUP 
03 SYS_SYMBOL CHARACTER( 2), % "17" 
03 TAPE_TYPE CHARACTER( 1), % O = SCRATCH 
% 1 = USER 
% 2 = BACKUP 
% 3 = LIBRARY 
03 FILLER CHARACTER ( a 
O02 OWNER_ID eee ; 
O2 FILLER CHARACTER (28) , 
O02 VERSION CHARACTER( 1); % 1 FOR THIS STANDARD 


The second of the three physical blocks is Header One. The same format is also used for end of file 


and end of volume. 


RECORD 
01 HEADER] RECORD 

O02 FILLER 
FILE_ID 
FILE SET ID 
FILE SECTION_NO 
FILE SEQ_NO 
GENERATION NO 
GENERATION _VERSION_NO 
CREATION DATE 
EXPIRATION DATE 
ACCESSIBILITY 
BLOCK COUNT 
SYSTEM_CODE 
FILLER 


% HDR1, EOV], EOF] 
CHARACTER (8 
eT ER 
CHARACTER (1 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
CHARACTER ( 
ae 
CHARACTER 


*HDR1="'000000", 
4RFS 


EOV, EOF = REA 


“hs ON = ONO DO EE On EO 
aN NE Nl NN 
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The third physical block, Header Two, is also used at end of file and end of volume. 


RECORD % HDR2, EOV2, EOF2 
01 HEADER2_ RECORD CHARACTER (80) , 
O02 FILLER CHARACTER( 4), . 
O02 RECORD_FORMAT CHARACTER( 1), % F = FIXED, D = VARIABLE, 
% S = SPANNED, U = UNDEFINED 


02 BLOCK_LENGTH CHARACTER 
O02 RECORD_LENGTH CHARACTER 
O2 RESV_SYSTEM_USE CHARACTER (3 


5 
3 
? 
03 DENSITY CHARACTER( 1),#0 = 800, 1 = 556, 2 = 200, 3 = 1600 
03 SENTINAL CHARACTER( 1), 
03 PARITY CHARACTER( 1), #0 = ALPHA (EVEN), 1 = BINARY (ODD) . 
03 EXT_FORM CHARACTER( 1), @ O = UNSPECIFIED 
1 = BINARY 
* 2 = ASCII 
% ? = BCL 
# 4 = EBCDIC 
03 FILLER CU ANACTER oui 
O2 FILLER CHARACTER (28); % RFS 


The MCP writes labels in ANSI format whenever a file is opened output, and the LABEL.TYPE field 
in the FPB is set to zero. To write the old Burroughs format labels, the LABEL.TYPE in each file 
in the pertinent programs must be modified. This may be accomplished in any of the following four 
ways: (1) by recompilation, (2) by the use of a File Attribute communicate operation within the pro- 
gram, (3) by use of the MODIFY program control instruction (see section 4 of the B 1000 Systems 
System Software Operation Guide, Volume I), or (4) by the use of a FILE card when the program 
is executed. Presently valid values for the LABEL.TYPE field are: 


0 = ANSI 
1 = Unlabelled 
2 = Burroughs 


The MCP writes tapemarks and ending labels on any output labeled tape that is not at beginning of 
tape (BOT) when a Clear/Start is done. This allows the user to read that tape and recover the data. 
There is one restriction. If the tape is to be read in reverse, the user must specify blocking information. 


ANSI labels are also written as the standard label on 7-track tape. When this is done, the labels are 


written with translation to Burroughs Coded Language (BCL). Burroughs labels, when written to 7- 
track tape, are written in odd parity, with the EBCDIC/BCL translator enabled. 
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TAPE FORMAT 


The format of the information that can be written on a magnetic tape is described in the following 
paragraphs. Both multifile tapes and multitape files are considered. A multifile tape is a labeled tape 
which contains zero or more data files. A multitape file is a data file which fills one or more tape 
reels and continues on another tape reel. 


MULTIFILE TAPE 

A multifile tape includes a label, optionally followed by data files, and a tape mark. The label contains 
a volume header and a header for the first data file, if any. A data file consists of a header, the data 
itself, and an end of file. The first data file uses the header in the label. Each of the additional data 


files has its own header. The last data file is followed by a tape mark, which causes the tape to be 
terminated with a double tape mark. 


The label is an ANSI standard label with certain deviations required for compatibility with other Bur- 
roughs computer systems. The label consists of a volume header (VOL1) and a header. 


The header consists of a header 1 record (HDR1), a header 2 record (HDR2), and a tape mark (TM). 


The end of file consists of a tape mark, an end of file 1 record (EOF1), an end of file 2 record (EOF2), 
and a tape mark. 


MULTITAPE FILE 


A multitape file has the first part of a data file on one or more tape reels and the remaining part 
of the data file on a continuation tape reel. 


The initial tape reel concludes with data and the end of tape photoreflective marker, followed by an 


end of volume and a tape mark. Valid data can be written beyond the end of tape mark. The tape 
is terminated with a double tape mark. 


TAPE STATUS 
The state of a magnetic tape after various operations are performed is described next. In the descrip- 
tions, which are numbered, a scratch ANSI label consists of a volume header block, a header 1 block, © 
a header 2 block, and a tape mark. 
1. Tape is initialized with the SN/SNL input message. 
The tape is: 
e Rewound. 
e Written with a scratch ANSI label. 


e Rewound. 


e Readied or locked depending on whether SN or SNL was used. 
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The tape contents and Read/Write head position are as follows: 
* BOT VOL1 HDR1 HDR2 TM 
* = R/W head position 

2. Tape is opened for output for File 1. 

The tape is: 
e Rewound. 
e Spaced over the volume 1 record. 
e Rewritten for the header 1 record. 
e Rewritten for the header 2 record. 
e Rewritten for the tape mark. 
e Accessible only to the program that opened it. 

The tape contents and Read/Write head position are as follows: 
BOT VOL1 HDR1 HDR2 T™ * 
* = R/W head position 

3. Tape data is written for File 1. 

The tape contents and Read/Write head position are as follows: 
BOT VOL1 HDR1 HDR2 TM Data * 
* = R/W head position 

4. Tape is closed with no rewind. 

The tape contents and Read/Write head position are as follows: 
BOT VOL1 HDR1 HDR2 TM Data TM EOF1 EOF2 TM TM * 
* = Read/Write head position 

5. Tape is opened for output for File 2. 

The tape contents and Read/Write head position are as follows: 


BOT VOL1 HDR1 HDR2 TM Data TM EOF! EOF2 T™ .... 
.... HDR1I HDR2 T™ * 


* = Read/Write head position 
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6. Tape data is written for File 2. 
The tape contents and Read/Write head position are as follows: 


BOT VOL1 HDR1 HDR2 TM Data TM EOF! EOF2 TM... . 
. HDR1 HDR2 T Data * 


* = Read/Write head position 
7. Data is written beyond EOF of the initial reel. 
The tape contents and Read/Write head position are as follows: 


BOT VOLI HDR1 HDR2 TM Data TM EOF1 EOF2 T™ . 
. HDR1 HDR2 TM Data EOT Data TM EOV1 EOV2 T™ . 


* = Read/Write head position 

8. Tape is positioned to read or write the continuation reel. 

The tape contents and Read/Write head position are as follows: 
BOT VOLI HDRI1 HDR2 TM * 
* = Read/Write head position 

9. Tape continues to be written for File 2. 

The tape contents and Read/Write head position are as follows: 
BOT VOL1 HDR1 HDR2 TM Data * 
* = Read/Write head position 

10. Tape is closed with release for File 2. 

The tape contents and Read/Write head position are as follows: 
BOT VOLI HDR1 HDR2 TM Data TM EOF1 EOF2 TM TM * 


* = Read/Write head position 
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APPENDIX | 
RPG PROGRAM MEMORY DUMP 


The following paragraphs describe how to obtain an RPG program memory dump and how to read 
the useful information contained in it. Example programs are included to illustrate the INVALID SUB- 
SCRIPT and STACK OVERFLOW program aborts. 


HOW TO OBTAIN AN RPG PROGRAM MEMORY DUMP 


The RPG program memory dump is generated by entering either of the following system commands: 
< job-number > DM 
<job-number > DP 


The DM system command causes a memory dump to be created and allows the program to continue’ 
executing. 


The DP system command causes a memory dump to be created and discontinues the program. 
The memory dump created by entry of the DM or DP system commands is a file with the name 
DUMPFILE/ <integer>, where <integer> is a system-generated number. After the file is created, a 
human-readable listing of the memory-dump file may be obtained by entry of the following system 
command: 


PM <integer>; 


The PM system command causes the DUMP/ANALZER program to analyze the memory-dump file 
and produce the listing. 


RPG DATA AREA DUMP INFORMATION 
The RPG DATA AREA DUMP portion of the analyzed dump file begins with the following heading: 


*** RPG DATA AREA DUMP #*** 
Next S-op at S= 11,D= 74 


NEXT INSTRUCTION POINTER Information 


The heading for the RPG data area dump portion of the memory dump includes a NEXT INSTRUC- 
TION POINTER: 


Next S-op at S= 11,D= 74 
The dump also shows this pointer in the information that precedes the 
*** FULL DUMP ANALYSIS *** portion of the memory dump printout, following the job status in- 
formation. Following are two examples, the first from a STACK OVERFLOW dump and the second 
from an INVALID SUBSCRIPT dump: 
INVALID SUBSCRIPT: S=11, D=74 (@00B@,@0004A@); DS or DP 


STACK OVERFLOW: S=12. D=31 (@00C@,@0001F@); DS or DP 
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This information identifies the next instruction to be performed. (S means segment, D means offset.) 


The LOGIC and XMAP compiler-directing options must be specified in order to locate which RPG 
source record is being processed. The XMAP information associates the segment-displacement informa- 
tion with a paragraph name, and the LOGIC information associates the paragraph name with the RPG 
source record. 


CONTAINER SIZES Information 
The CONTAINER SIZES information has the following format. 


#kK CONTAINER SIZES %%% 
23 :COP TABLE ENTRY 
11 = sDATA DISPLACEMENT: 
8 :DATA LENGTH: 
6 :COP INDEX: 
2 | 


1 :BRANCH DISPLACEMENT 


INDICATORS SET Information 


The INDICATORS SET information shows which indicators in the RPG program were ON when the 
memory dump was generated. The format of the INDICATORS SET information follows. 


xxx INDICATORS SET *xx 
0 
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CURRENT OPERAND (COP) TABLE Information 


The CURRENT OPERAND (COP) TABLE information lists the table address, COP index, data type, 
address (segment, displacement), digit length, and the data for each field name used in the RPG pro- 
gram. Note that some field names are used internally by the RPG cycle and are not available for use 
by the RPG programmer. The following is the format of the COP table information. 


week CURRENT OPERAND (COP) TABLE *xx 
ADDRESS 


TABLE COP DATA DIGIT © 
ADDRESS INDEX TYPE (SEG,DISP) LENGTH DATA 
@000040@ 1 UN 0,128 3 001 
@000057@ 2 UN 0,131 3 000 
@00006E@ 2 UN 0,134 3 001 
@000085e@ UN 0,137 2 O01 
@00009Ce@ 5 UN 0.133 1 0 
@0000B3 6 UN 0,140 1 0 
@0000CA@ j UA 0,141 30 =. 2722277223727 
@0000E 1@ UN 0, 30 2 00 
@0000F 8@ 9 UN 0,41 2 00 
@00010Fe@ 10 UN 0, 321 3 000 
@000126@ 1] UN 0, 324 2 00 
@00013D@ 12 UN 0, 326 2 00 
@000154@ 1 UN 0, 328 8 00000000 
@00016B@ ] UN 0» 336 8 00000000 
@000182@ 15 UN 0, 6 000000 
@000199@ 16 UA 0, 344 180 9QJJJJJ 
@0001B0@ YF UN 0,524 ; 001 
@0001C7@ 1 UA 0,527 26 SEEEEEE 
2222203333 3D4K444KE55555 
@0001DE@ 19 UN 0,79) 3 «O11 
@0001F5@ 20 UN 0,794 3 000 
@00020C@ 21 SN 0,797 1 +0 
@000223@ 22 SN 0.199 L +0000 
@00023A@ 23 SN 0,80 6  +000000 
@000251@ 2 SN 0,811 6  SUBSCRIPTED -- 1 FACTOR 
(TABLE BOUND = 28) 
FACTOR 1 = 7 
{i} +111110 
2 +222220 
+ 0 

i TEEEREG 

5) +555550 
@00027F@ 26 UN 0,846 L 05 
@000296@ 2 SN 0,850 6  +000000 
@0002AD@ 2 UN 0,857 kL 0000 
@0002C4e@ 29 UN 0,86) 4 0000 
@0002DBe 30 UA Bree? 180 9QJJJJJ 
@0002F 2@ 31 SN 0, 1045 | 9 
@000309@ 32 UA 0, 1047 12 JJJJJ 
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SUBROUTINE STACK Information 


The SUBROUTINE STACK information lists the current nesting levels of the subroutine stack. This 
information is useful whenever a STACK OVERFLOW abort occurs in the RPG program. In general, 
increasing the value of the STACK compiler-directing option solves the STACK OVERFLOW program 
abort. 


The following is an example of the SUBROUTINE STACK information when no subroutines have 
been entered. 


kkk SUBROUTINE STACK **% 
@0013AC@ :STACK BASE 
@0013AC@ :STACK TOP 
*xk*k NO ENTRIES ON SUBROUTINE STACK xxx 


ANALYZING AN INVALID SUBSCRIPT PROGRAM ABORT 


The example source program in figure I-1 and the MAP information generated in figure I-2 show a 
method of associating field names with COP index entries. The subscript field name in the source pro- 
gram is LX and the array name is ARY. The MAP information associates IX with COP index 31 and 
ARY with COP index 32. The DATA column in the CURRENT OPERAND (COP) TABLE presented 
earlier shows that the COP index 31 has a value of +9. Since the number of entries for ARY is 5, 
an attempt to reference an index value of 9 causes an INVALID SUBSCRIPT program abort. 


00100 $ NAMES 
00110 5 XREF 
00120 5 MAP 
noite PARMAP 
00140 5 LOGIC 


00150 $ XMAP 
OO200H | 

O0300F IN IPE 
OO4SOOFLINE 0 
OO500E 


006001 1N NS 01 

007001 1 
00600 | 1 
00900! 2 


1800 90 DI 
132 PR 


ARY 


90 RECORD 
1O1X 
7 ARDATA 


01000C 
07100C 
01200C 


MOVE ARDATA 
SETON 
SETOF 


a OOOL INE D ~ Ol 


1-4 


RECORD 
ARY 


ARY, IX 
102030 
30 


90 
100 


Figure I-1. Source Program with Compiler-Directing Options 
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RPG 


Program Memory Dump 


CODE SPACE 
CODE SEG O SIZE - 179 BYTES 
CODE SEG 1 SIZE - 115 BYTES 
CODE SEG 2 SIZE - 43 BYTES 
CODE SEG ? SIZE - kl BYTES 
CODE SEG SIZE - 25 BYTES 
CODE SEG 5 SIZE - 16 BYTES 
CODE SEG 6 SIZE - 13 BYTES 
CODE SEG é SIZE - 12 BYTES 
CODE SEG SIZE. = O BYTES 
CODE SEG 9 SIZE - 179 BYTES 
CODE SEG 10 SIZE - art BYTES 
CODE SEG 11 SIZE - 34 BYTES 
CODE SEG 12 SIZE - 8 BYTES 
CODE SEG if SIZE - 7] BYTES 
CODE SEG 14 SIZE - 16 BYTES 
CUMULATIVE CODE SEG SIZE - 987 BYTES 
LARGEST CODE SEGMENT - 229 BYTES 
CODE DICTIONARY - 150 BYTES 
xk MINIMUM CODE SPACE REQUIRED TO RUN - 379 BYTES ** 


Figure I-2. Output from MAP Compiler-Directing Option 


ANALYZING A STACK OVERFLOW PROGRAM ABORT 


Figure I-3, an RPG source program, is included to illustrate the STACK OVERFLOW program abort. 
Figure I-4 shows the SUBROUTINE STACK information generated from the analysis of the dump file 
after this abort. Note that the segment/displacement values are repetitions. This signifies that the pro- 
gram is looping as it keeps trying to perform a subroutine that is already nested. 


By comparing the segment and displacement values with those generated in the XMAP information, 
and then comparing the associated paragraphs with the LOGIC information, the RPG source state- 
ments that caused the STACK OVERFLOW program abort to occur can be identified. 


00100H 

OO200F IN 
003001 IN 
00400] 

00500C 

OO0600CSR 
00700CSR 
OOSOOCSR 
OO9O00CSR 
01000CSR 
01100CSR 


IPE 


NS 


1800 90 
01 


MAIN 


OTHER 


DISK U 


1 90 DUMMY 

EXSR MAIN 

EGSR 

EXSR OTHER 

ENDSR 

BEGSR 

EXSR MAIN 

ENDSR 


wo 


meen ne ono 2 eh = 3 hn en eh kT - 


Figure I-3. Source Program for STACK OVERFLOW Program Abort 
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*xxk*k SUBROUTINE STACK #x% 


@000A 3AQ@: 2618 :STACK BASE 
@000B70@: 2928 :STACK TOP 
wee SUBROUTINE STACK OVERFLOW **x 
STACK 
ADDRESS SEGMENT DISPLACEMENT 

@O000A3A@ 10 25 
@000A59@ 12 25 -+ 
@000A78@ 12 56 ! These 
@000A97@ 1? 25 | stack 
@O000AB6@ 12 56 entries 
@000AD5e 12 25 +<- repeat 
@O00AF 4L@ 12 56 (i! the same 
@000B 13@ 12 25 ! displacement 
@000B32@ 12 56! address. 
@000B51@ 12 25 ~+ 


Figure I-4. SUBROUTINE STACK from STACK OVERFLOW Abort 
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